(38 MAINTENANCE DYAGNOSTIC PROGRAM 


4071 


Y 


“on BRR LOC OBJECT CODE 


AOD 
OAODE 
OAOF 


CAT 
OA15 
OATH 
OAT 
OA19 
OATB 
OAIF 
0A20 
DA2Z1 


DA23 
OA27 
OA2D 
OA31 
OAI5 
GA39 
QOAIC 
NAY 0 
OA43 


OAN? 
OANB 


QOABD 


DATE 
EC Ww). 


3741 FUNCTION TEST WITHOUT THE WRAP CONNECTOR 


01 
00 


OA51 


Cy 
yy 
77 


87 


1A03 
LOEG 


C0 
06 
50 


87 


TA53 


3C 
oc 
C2 
34 
3D 
P2 
3C 
F2 
3C 


cqQ 


40 
OA 
1 
07 
EO 
81 
RO 
87 
FY 


87 


40 E? 


co 


T6AUGTA 
B24 765 


87 


ADDR STANT SOURCE STATEBERNT 


OAND 
OAOFE 
OA10 


OA11 


OATS 
OA 16 
OA18 
OATA 


OAIF 
OA 20 
0A22 


TSNOVTY 


B24370 


we Ow Hin Fuss 


37 
38 
$9 
40 
4 Y 
NK? 
Ky 
ul 
4S 
46 
uy 
KB 
49 
50 
51 
§2 


* 


DECK 
SEQ 


4 
0 


LI7G1 START O 


TREP 
NRG 


X'AOGO! 


PART WO. 55584214 
PAGE 1 


LAST CHG:08 01 74 


hop betta ne eLese it et teste et eter r+ ester et? £2 ee ot Seon SRRKEKEKEKEKK RHR EEK 


* 3741 FONCTION TEST 
CREE EERR REESE REE ERE ERK ERE EHR EAE EK ERE REE EE ERERE AE EREEES REE ERR 


3 
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AL2 (BEGIN) 
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XL3"405000* 
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HPLXX 


XLVO18 
XL1"008 
AL2 (RTNO1) 
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PRINT 
XL1ta1? 
AL1(§SG1-MSC1B) 
AL2 (4SG1) 
XL2*40RF0! 
PRINT 

XL1' 06° 
AL1(4SG2~MSG2B) 
AL2 (MSG2) 


PRT¢7,X* 40° 
PRT (997) ,-PRT+1 
RTNO1,XR1 
FRIN, KR? 
HPLXX,X*EO! 
ALTER 
HPLXX,X*EO% 
“x47 
HPLXX,X*E1* 


HALT 
XL2'4GE1¢# 


BEGINN 
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PRINY BEGINNING INSTRUCTIONS 


BUTLD 'CLEARYNG* BYTE. 
CLEAR PRINT ARFA. 
RESTORE RTNO1 ADDRESS. 
CURRENT HALT A ~EO- ? 
JUMP YF So. 

SET UP FOR A -E0O- HALT, 
SET UP FOR A ~E1~ HALT. 


PROGRAM HALT ~E0~ OR -E I~. 
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TEST 3741 POR NOT READY. 


TIO IR IORI IORI IRI IER OR IOII IO OR ROI II RIOR IRI IIR III ICI IRR IORI ROR OI RO 


ROUTINE NUMBER 
NO MANUAL INTERVENTION REQUIRED 
ROUTY’ E O02 ADDRESS 


RTNOT DC XL7°01' 
DC XL1'00° 
DC AL2 (RTNO2) 
PRINT PRINT NOT READY TEST HEADING. 
XLUTtag 
IL 248 
AL2 (TORDY) 
XLZ2°*40A1* 


TEST FOR SSW 10. 
HALT -FF~ IF ON. 


QUES 
X'3c',x'3c! 
LINK, X*40! BRANCH TO DCP IP NOT READY. 


TYOERD BRANCH TO RDY ERROR IF NOT ON. 
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* ROUTINE O02 
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XL1"02! 
XL1°008 
AL2 (RTNO3) 


PRINT 


ROUTINE NUMBER 
NO MANUAL INTERVENTION REQUIRED 
ROUTINE 03 ADDRESS 


PRINT BUSY T@ST HEADING. 


DC X¥L7°45? 
IL1*23" 
AL2 (TOBSY) 
XL.2*4OA2" 


TEST FOR SSW 10. 
HALT ~FF- IF ON, 


QUES 
aeact,Xx*jct 
TIORRB,X'42" BRANCH OUT ON ERROR IF BUSY. 


LINK RETURN TO DCP. 
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QOAKB O3 
QOABC O60 
OARD OAPD 


OAKF 38 RO 0208 
OA99 CO 10 0216 
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TSwWOVTY 
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ROR IOIO ROR ROR RIOR ROKR IRR ROR RIOR RII IORI RR ROR RCI ROIO RRR RR RR IORI IO RIOR RIOR i OR fot 
he 
# ROUTINE 03 
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SENSE THE STATUS-~LENGTH COONT REGISTERS. 


RRR ROR ROR RCH ROR AT MRR RIOR ORR EERE EERE ERE REE RR | 


ROUTINE NUMBER 
NO MANUAL TNTERVENTION REQUIRED. 
ROUTINE O04 ADDRESS. 


RTNO3 DC XLT4038 
pe XL1*008 
Dc AL2 (RT NOM) 


TEST FOR LOOP ON SECTION SWITCH. 
SKIP THIS ROUTINE IP ON, 


TBN SBYTHO ,SS W000 

BT LINK 

MVC PRT~81( 10) ,SNTHE BITLD UP VEST HEADING FOR PRINTING. 
AVC PRT-4 8 (33) -STLCR 

AVY PRT~&7,X*4B! 


B PRIWT GO PRINT TEST HEADING. 


PROG ID QgQi- 4 
PAGE TA 


i 


H 
a 
hc 


) 


TBE MAXNTENARCE DIAGNOSTIC PROGRAN 


p 
, 
i 
B 


; 
a 
| 
| 
q 
i 


4)1 


TERR 


7 
LOC 


OAAB 
OAAC 


OAAD 


OAAF 


OAB1 


ORB? 
OABB 
OABF 
OAS3 
Oac7 
OAcS 


OACF 
OAD3 


OAD6 


3741 
OBJ ECT 


46 
5B 


OADA 


OAEO 


TP49 
GOAY 
OC SA 


37 
3c 


W3 
01 
Bt 


16AUGTS 


324765 


CODE 


YFS9 IPF4GA 


18CE 
V7BF 
T8CE 
OB3D 
17BF 
18E8 


175D 
3c 


OAEB 
OAEB 
0216 
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150 
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159 * 
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SOURCE STATEMENT 


XL1°46" 
IL1*944 

AL2 (PRT) 
XL2740A3" 
PRT(97} ,PRT#1 


HOOOO,xtait 
DROPD, X*42" 
HOCOo, x¢4u5® 
TRL, X* 43" 

DBOPD, X'G2¢ 
HOFSS, X' ay? 


uss 
K'3C',X"3C? 


LCR, X*42"' 
LCR (2) , LCE-2 
LINK 


ERROR MESSAGE * 


SNS ERR 
XL2° 8000 * 
XL2' 00006! 
XL1'O35 
MAPS 
YL2°87481! 


HALT 
X¥L2' 4003! 
LIWK 


XL 1°04! 
WL1'008 
AL? (RTHOS) 


PRT-81 (10) ,SNTHE 
PRT~63(18) , IOTRL 
PRT-62,X'4B! 
PRINT 

XL1*46? 

IL1e91' 

AL2 (PRT) 
XL2°HOa4 

PRT (91) ,PRT+1 


QUES 
Ki3c* x t3ct 


TRL, X'a 3% 
LIWK 


ERROR MESSAGE * 


SNSBERR 
iL2°*0G000* 
XLZ *OO00t 
XYL7*Oq? 
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CLEAR PRINT AREA. 


ZERO FUNCTION REG. 

BRANCH IPF 3747 WENT BUSY. 

ZERO DATA TRANS REG. 

SEWSE TO RESET 6USEC DELAY CYRCUIT. 
BRANCH IF 3741 WENT BOSSY. 

PRESET DATA ADDRESS REG. 


TEST FOR “SW 10. 
HALT -PF- IF ON. 


SENSE STATUS-LENGTH COUNT FOR ~8000- 
SEWSED DATA AS EXPECTED? 
RETURN TO DCP IF OK. 


GO PRINT SENSE ERROR. 
~EX PECTED. 

~ACTUOAL. 

“ERROR ID. 

POINT TO MAP CHART. 
~PAGE 874, FMPRY 1, 


ERROR RALT -03-. 


RETURN TO DCP. 


FREESE TEER ER EER EEE SEER ERE EER EEE ORE KEE RE RARER ERE EER EERE EKER KE ERE 


SENSE THE 2/0 TRANSFER LINES. 


FREESE EERE ERE RER EER EEE EERE ETRE KEE EET RE EREE REE EEK ER EERE RERR EERE LUE 


ROUTINE NUMBER 
NO MANUAL INTERVENTION REQUIRED. 
ROUTINE O5 ADDRESS, 


BUILD UP TEST HEADING FOR PRINTING. 


GO PRINT TEST HEADING, 


CLEAR PRINT AREA. 


TEST FOR SSW 10. 
HALT ~PF~ IF OF. 


SENSE I/O TRANSFER LINES FOR 0000. 
SENSED DATA AS EXPECTED ? 


RETURN TO DCP IF OK. 


GO PRIWT SENSE ERROR. 
~EXPECTED. 
baad ACTO AL. 


~ERROR ID. 
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4017 3741 FUNCTION TEST WITHQUT THE WRAP CONNECTOR 


ERK LOC OBJECT CGDE ADDR STMT SOURCE STATESENT 


OB3P CO 87 17D9 190 MAPS POINT TO MAP CHART. 
OB43 8781 OBa4 191 i XL2°8781! ~PAGE 878, ENTRY 
| 192 
OB45 CO 87 0222 193 HALT ERROR HALT ~O&4&-. 
OB49 4008 OB4YA 194 XLZ 74004 % 
OB438 CO 87 0216 195 LINK RETUSN TO DCP. 
196 
197 
199 See RKEK ER 


199 *® RTNOS * 
200 FEES REKEREREKESE CERES KEKE RHEE EERE EEE EERE REET EEE EKER ERE EKA EEEEE SE | 
201 * 
202 ROUTINE 05 SENSE THE DIAGNOSTIC BYTR. 
203 * 
ZO EERREEREERERE HERES EERE EERE EERE EEE HK EERE EEE ERO REECE EEE EERE ERED | 
205 RTNOS AC XL1*#05? ROUTINE NUMBER 
206 pc XL1'00! NO MANUAL INTERVENTION REQUIFED. 
207 pe AL2(RTRO6) ROUTINE G6 ADDRESS. 
208 | 
6208 209 TBR SBYTEO,SSHW00 TEST FOR LOOP ON SECTION SWITCH. 
0216 210 BT LINK SKIP THIS ROUTINE IF ON. 
211 
1EP8 1E66 212 PRT-81(10) ,SNTH? BUITLD UP TEST HEADING FOR PRINTING. 
1F07 1BCA 243 PRT-66(15) , DIAG 
1P08 2714 PRT~65,X'UB? 
O21K 215 PRINT GO PRINT TEST HEADING. 
216 DC XL1%46? 
217 DC Ini91 
218 pc AL2 (PRT) 
219 DC JL2°90A5' 
1P49 1FQA 220 MVC PRT (91) ,PRT+1 CLEAR PRINT AREA. 
221 
175D 222 B QUES TEST FOR SSW 10. 
3c 223 HPL x'3ct,x'3c HALT -FF- IF OW. 
224 
0897 225 SES puG,x'a5* SENSE DIAGNOSIC BYTE FOR 00. 
0B96 OB9Y 226 CLC pUG~1(1),DUG+3 SENSED DATA AS EXPECTED ? 
0216 227 BE LINK RETURN TO DCP IF OK. 
228 | 
229 * KOUTINE 05 ERROR MESSAGE * 
230 
0B90 j 234 SHSERR GO PRINT SENSE ERROR. 
OB94 232 XL2'00001 ~FXPECTED. 
OBI6 233 XL2*0000" ~ACTUAL. 
0B98 234 XL1"°05! “ERROR ID. 
0n99 235 MAPS POINT TO MAP CHART. 
0B9D 236 XL2"8a1it -PAGE ®81, ENTRY 1. 
237 
OB9F 238 HALT ERROR HALT -05-~-,. 
OBA3 239 | XL2'4005" 
OBAS 240 LINK RETURN TO DCP. 
244 
242 
243 eARSERES KE 
244 * RTNOGB * 
Zu5 REKMRESKKKKEKKEKEREKKERKKE KEES TECK EKAEEKKEKAKEAKCAKEARKA RK  KEKAKHKEKEKEEKS 
246 * 
207 * ROUTIN® 06 CHECK EB CYCLES FOR PROPER 
248 * DATA TRANSMISSION. 
249 * 
2750 KSESRKEKEEEKEKEKAEKTA ESSERE AKERS KEKE AKASH AEKEREEHEARAKKAKERAKRRER 
06 OBA9 251 RTNOG DC XL1'06! ROUTINE NUMBER 
00 OBAA 252 pe XL1*00% NO MANUAL INTERVENTION REQUIRED 
OD37 OBAC 253 pc AL 2 (BTNO7; ROUTINE 97 ADDRESS 
2548 
CO 87 O21A 255 B PRINT PRINT EB CYCLE TEST HEADING. 
45 OBB1 256 pe XL1745+ 
2% OBB2 257 pc IL1* 36" 
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302 
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309 
310 
3141 
312 
343 
344 
315 
316 
317 
318 
319 
320 
321 
az2 
353 
324 
325 


OBBS 
OBBE 


OBB3 1888 
OBB5 40a6 


0BB7 


OBBB 
OBBF 


0BC2 
OBC6 
OBCA 
ORCE . 


OBD2 
0BD6 
OBDA 
OBDE 


JBE2 
OBE6 
OBEA 
OBEE 


OBF2 ° 
0 BF6 
OBFA 
OBPE 
_ 0co4 
OCOA 
OCOE 


OC42 
GC 16 
OCA 
OCIE 
OC22 
OC26 
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? 
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3 
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OC2ZA 
GC2E 
0C32 
0C36 
OC3A 
CCIE 


= ame 


9°42 
OC4G 
OC4A 
OCUR 
O0C52 
0C56 
OCSA 
OCSE 
OC62 
0C66 
OCGA 
OC6E 
0°72 
02 76 


= - Se BH HR 


OC7A 


3c Fl 1Be8 
cO 87 OQCBA 


TSNOVT4S 
824870 


T6ADG7R 
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EBIERR NVI 
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3741 POUNCTION TEST WITHOUT THE WRAP COWNECTOR 


ADDR STMT SOURCE STAT EXENT 


AL 2(TSCYC) 
XL24'00 a6" 


DROPD, X'42* 


QUES 
x*3ct,X*3c° 


HPFSS,x°41! 
HFP55S,X*42° 
HFPSS,X'4a! 
HFF55,x°45# 


LS-6,X°41! 
LS-4&,K*42* 
LS-2,X* hue 
LS,x*as? 


LS,XR1 

CK DYT+3,XR1 
EBFLAG,X*00* 
STBN+1,X*O1! 


*-*, X100" 

*48 

EBFLAG,X*'00! 
STBN4+1(1) ,STBN+1 
CK BYT+3 (2) ,N001 
STBN+1,X"FF? 
CKBYT 


THE EB PLAG BYTE. 


ZBPLAG ,X*?F3! 
EBERR 
FBFLAG,X'S3* 
EBTERR 
EBFLAG,X'a2* 
EB2ERR 


EBFLAG,X ‘co 
ycop! 
EBFLAG, <' 30° 
NCOD2 
EBPLAG,2‘0C* 
WCO DY 


EBFLAG,X'49* 
NCODDY 
EBFPLAG,X*80! 
NCODD1 
EBFLAG,X'10! 
NCODD2Z 
EGFLAG,X'20° 
NCODP2 
BBPLAG,X*O4' 
NCODDS 
EBFLAG,X‘*08'* 
NCODDS 
EBFLAG,X*O1° 
¥CO DDS 


LIWK 
ERROR BESSAGES * 


ALEBX-15,C*t't 
a 


LOAD 


PAGE 12 


PART NO. 
PAGE 


JURP OUT IP 3741 IS BUSY. 


FOR SSW 10. 
~FF~- IF ON. 


TEST 
HALT 


FONCTION REG. WITH ~FF55~. 
LENGTH COUNT REG WITH -55-. 
DATA ADRS REG WITH ~FF55~. 
DATA TRANS REG WITH ~55-~-. 


LOAD 
LOAD 
LOAD 


SENSE FUNCTION REGISTER. 

SENSE STATUS AWD LCR. 

SENSE DATA ADRS REGISTER. | 
SENSE DIAG AND DATA TRANS REG. 
INITIALIZE SENSE STORAGE ADDRESS. 
CLEAR EB FLAG. 

INITIALIZE FLAG BIT POINTER. 


TEST CURRENT SEMSE BYTE. 
BRANCH IF BYTE NOT ZERO. 
TORN ON FLAS BIT IF ZERO. 
SHIFT BIT POINTER. 
DECREMENT SENSE ADDRESS. 
POINTER GONE TO ZERO ? 


CONTINUE TO LOOP IF NOT SO. 


BRANCH IF BOTH EBT AND EB2 FAILED. 


BRANCH IF EB! FPAYLED. 


BRANCH I¥ @B2 FAILED. 


BRANCH IF BOTH £B'S OF N=1 FAILED. 
* 2 ax 


*x 4 


BRANCH EB1 OF N=1 FAILED. 
* * 


* 2 * 


* 
* 


RETURN TO DCP. 


SET UP FOR EB 1 ERROR. 
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8011 37%1 FUNCTION TEST WITHOUT THE WRAP CONNECTOR 


ERR LOC OBJECT CODE ADDR STMT SOURCE STaTEMENT 


AL EBX-15,C'2? SET UP FOR EB 2 ERROR. 
PRT~67 (24) , ALEBX 
BIGEB 


1B88 EB2ERR SVI 
1P06 1897 AVC 
0D +9 


0C86 3C 
OCGA OC 
oc90 CO 


PRINT FRROR HEADING. 


oca4 1B7F EBERR PRT-68 (2°) , ALEB SET UP FOR ALL FEB FAILORE. 


OCSA 


OCIE : 


OCA2 
OCA5 
OCA9 
OCAC 
OCBO 
OCB6 


OCBA 
OCBE 
OCC2 
occts 
OCCA 
OCCE 
OCcD2 
ocDs 
9209 
ocDD 
OCEt 
OCES 
OCB9 
OCRD 
OCFO 
OCP a 
OCFS 
OCFC 
op00 
ODO 
YOR 
ODOB 
ODOF 
OD13 


0D19 


ODD 


ODTE 
OniF 
0D21 
0D23 
OD: 7 
OD2B 
0D2D 
0D31 
0D33 


07 
00 
OD6F 


0c 01 1919 
CO 87 1800 
Fi 


16AU G74 
624765 


1BEO 


OD&5 


TSEOV74 
B2KETO 


WOOD 
NCOD2 


NCOD4 
FINES 


NCODD1 


NCODD2 


NCODDY 


¥CO DDS 
EBrX 


BIGEB 


EEG RAR REE 
* RINO7T * 


KEL SEHR EREREREK EKER EAA HKEREKEKEEE SEERA EET ERE EMME ERE HK EK & 


* 
x 
x 


ROUTINE 07 


BIGEB 


EB12-1,C*1! 
FINEB 
EB12-1,C'2!* 
FINEB 
EBI2-1,C*4! 
PRT~57 (34) , EB12 
BIGEB 


EBX~-1,C'1# 
EBPLAG,X*40Q* 


#442 


EBX-24,C'2?* 
xef 
BBX-24,C*1? 
EBXX 
EBX-1,C'2° 
EBFLAG,X* 10! 
*+12 

EBX~ 24,C*®2! 
*+8 

EBX-248 ,C'i' 
ESXX 
WBX-1,c 4! 
EBFPLAG,X*04?* 
*4 42 

EBX~24 ,C*?' 
* +f 
EBK~24,c'1T!? 
EBXX 


EBA=-1;,0°5" 
EBX~-24,C%1* 
PRT ~62 (29) , EBX 


PRINT 
XL1'C2! 
IL 1? 24° 
AL2 (BIGGEB) 
XE2°4006' 
EPRNT 2 
MAPS 
XL2'8851* 
HALT 
XL2'* 4006" 
LINK 


PRINT ERROR HEADING. 
SET UP FOR BOTH EB'S, N 
GO PRIWT ERROR. 

SET UP FOR BOTH EB*S, N 
GO PRINT ERROR. 

SET @P FOR BOTH EB'S, WN 
GO PRINT ERROR HEADING. 


SET UP FOk W CODE 7 FRROR. 


* EB2 CYCLE. 

* EBT CYCLE. 

GO PRINT ZRROR. 

SET UP FOR N CODE 2 ERROR. 
* EB2 CYCLE. 

* EB? CYCLE. 

GO PRINT ERROR. 

SET UP FOR N CODE 4 ERROR. 
* EB2 CYCLE. 


* EBT CYCLE. 
GO PRINT ERROR. 


SET YP FOR N CODE 5 ERROR. 
* EBT CYCLE. 


PRINT EB CYCLE ERROR HEADING. 


PRINT SPECIAL ERROR ID. 
POL RT TO MAP CHARTS. 
~PAGE 885, ENTRY 1. 
ERROR HALT -06-. 


RETURN TO DCP. 


LITO & SNS FUNCTION REG WITH AAS5S5. 


EEK RAKE KEE KEME EEK SERAESEKEKSEAKKSEKREAEK EERE EKA HEHE KERR UE EEHKESE EH 


RTNOT 


DC 


pC 


DC 


RYC 


B 
DC 


XL 1°07" 
XL1'OO° 
AL 2 (RTNOB} 


PATRN{2) ,HAASS 
CODE 
CLit{! 


ROUTINE NURBER 


WO MANUAL INTERVENTION REQUIRED 


ROUTINE O08 ADDRESS 


STORE TEST PATTERN. 
PRINT TEST HEADING. 


PROG ID 
PAGE 


BC Ne 


S28 P69 


CBM NAINTERNAWCE DIAGNOSTIC PROGRAA 


ce 
4O11 


fepR Loc 


onus 
ODSA 


OD4&D 
0D51 


0D55 
0D59 
OD5A 
OD5B 


OD5F 
0D63 
0065 
0D69 
OD6B 


F-— SF ae wy _ - id - ed 


5 
p 
g 
3 
g 


= x 


ODA? 
ODA8 
ODA9 


ODAB 
ODB1 
ODBS 


OUBSG 


i 


DATE 
EC WO, 
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OBJECT CODE 


co 
FO 


30 


Jc O71 
co 87 
F2 


CO 87 


175D 
3c 


1919 
1917 


1488 


0216 
17 D9 
0222 
0216 


ADDR STAT 


1919 18E2 


1800 
175D 
3C 


1979 
1917 


1488 


0216 
17D9 
0222 


0216 


1919 
1800 


175D 


T6A0GT4 
8264765 


13B6 


TS NOV7A 


824870 


394 
395 
396 
397 
398 
399 
400 
404 
802 
403 
804 
8O5 
406 
407 
408 
409 
4706 
414 
442 
413 
G14 
415 
416 
447 
418 
419 
4% 20 
421 
422 
423 
824 
425 
426 
427 
426 
829 
#30 
43 
832 
433 
434 
435 
436 
437 
438 
439 
&40 
Qh 
a2 
443 


THE WRAP CONNECTOR 


SOURCE STATEMENT 


HRERRRK EK 
* RTHOB * 


QUES 
X*2c',x'3ct 


PATRN,X*41* 
LSCK,xi*a7' 


LIOSFS 
XL1°07* 
CLitit 
u INK 


MAPS 
XL2'*38891* 
HALT 
XL2 74007 
LINK 


ee ee eee! ee 


PAGE 


TEST FOR 
HALT ~FF~ 


SSk 10.. 
IF OF. 


LOAD FUNCTION REG WITH 
SENSE FUNCTION REG FOR 


GO COMPARE RESULT WITH 
“ERROR ID. 

“NW CODE. 

RETOUR’ TO DCP IF OK. 


POINT TO MAP CPART. 
~/AGE 889, ENTRY 1. 
BRROR HALT ~O7~. 


RETURN TO DCP. 


oR We OO 


13 


~AAS5~. 


EXPECTED. 


PEK EEERERRER EEE SEES EE EEE EK EEE EERE CREE REESE EERE EEREREEEREEKEREK 


* 


* ROUY NE 08 


* 


LIO &@ SWS FUNCTION REG 8ITH 5S5AA. 


HEKEERERLER REE ERE EKER EES EERO REREEERE HERRERA REREEREREREKEREREREE 


RTNO8S DC 
DC 
DC 


HE EEE EK KK 
* RTWOD * 


XL1"08' 
XL1*00' 
AL2 (RTNO9) 


PATRN(2) ,H55AA 


CODE 
CLUt1* 


QUES 
At aC! sh 2c" 


PATRN,X*UT* 
LSCK,x*at? 


LIOSNS 
¥L1' 08! 
CLIT? 
LINK 


RAPS 
XL2*8891' 
HALT 
XL2 "8008 * 
IRR 


ROUTINE NUMBER 
NO MANUAL INTERVENTION 
ROUTINE 09 ADDRESS 


STORE TEST PATTERN. 
PRINT TEST HEADING. 


TEST FOR SSW 10. 
HALT -FF- IF ON. 


LOAD FUNCTION REG WITH 
SENSE FUNCTION REG FOR 


GO COMPARE RESOLT WITH 
~FRROR ID. 

~N CODE. 

RETURN TO DCP IP OK. 


POINT TO MAP CHART. 
~PAGE €89, ENTRY 1. 
ERROR HALT -08~. 


RETURN TO DCP. 


REQUIRED 


-S5AR-. 


EXPECTED. 


PERE EKER EKER REE RAE ERE ERE BRECKER KEK AA EELEKE TER AKER EOCARERERREREARE SE 
| 
* 


x 


x ROUTINE 09 


* 


FETE ERE EOE EEE AEE EERE ERE SE ERE EEE ERE REE ERE ERRE EERE EERE EEERERTAREER 


RTROS DC 
DC 
bc 
4ve 
b 
DC 


B 


XL1°09" 
XL1?008 
AL2 (RTROA) 


PATRN (2) ,HOO5SS 


CODE 
Chitg* 


QUES 


ROUTINE NUMBER 
NO MANUAL INTERVENTION 
ROUTINE OA TZST 


STORE TEST PATTERN. 
PRINT TEST HEADING. 


TEST FOR SSW 10. 


PROG 
PAGE 


LIO & SWS LENGTH COUNT REG #ITH 55. 


REQUIRED 


ID 


if 


5558427 | 
a 


t 


I 
is 


EC NO. 


Ne 
: 
y 


80171 


J RRR LIC 
ODBA 


ODBD 
ODCc1 


ODCS5 


oDc9 
opcD 
ODCE 
ODCF 


QODD3 
ObD?7 
ODDS 
ODDD 
ODDF 


824765 


824870 


IBM MAINTENANCE DIAGNOSTIC PROGRAM 


3741 PUNCTION TEST WITHOUT THE WRAP CONNECTOR 


OBJECT CODE 
FO 


31 
30 


3c 


co 
09 
F2 
C0 


CO 87 

C2 

2B 

1COB 

8OOC 

CO 87 17D9 
8912 

CO 87 0222 
¥O0C 

CO 87 0216 


1SNOV74 
824870 


T6AUGTS 
824765 


862 
463 
464 
465 
466 
467 
&68 
469 
&70 
G71 
472 
473 
G74 
475 
&76 
477 
478 
u79 
480 
487 
8B2 
4&3 
4uBy 
485 
486 
487 
488 
489 
u90 
491 
492 
493 
4O4 
ih be) 
196 
497 
498 
499 
500 
501 
502 
503 
504 
505 
506 
507 
508 
509 
510 
511 
572 
5173 
514 


HPL 


LITO 


RR A he He he HE 
* RTNOA * 


ADDR STMT SOURCE STAT ESENT 


AY 3C? 2° 3C? 


PATRN, X'H2* 
LSCK,Xt428 


LSCK~1,Xx'00' 


LIOSNS 
XL7*09°" 
CLit2¢ 
LINK 


MAPS 
X1,2°8971" 
HALT 
XL2 *40095 
LIWK 


ee a wie eet ic ee 


PEGS 


PART NO. 
PAGE 


HALT -PF- IP ON. 


LOAD LENGTH COUNT REG WITH ~55-. 
SENSE STATUS AND LCR FOR ~8055-. 


CLEAR STATUS BYTE. 


GO COMPARE RESULT WITH EXPECTED. 
~ERROR ID. 

~N CODE. 

RETURN TO DCP IF OK. 


POINT TO MAP CHART. 
~PAGE 891, ENTRY 1. 
ERROR HALT -09-. 


RETORN TO DCP. 


5558421 


Gh 


EREKKKKKEKE ERE AREA KEKK KE EEKKKKEEEEKEEAEREE EKER EKEEEKEREEKCEEKREEEAREKE EEE 


* 


* ROUTINE OA 


x 


RT# Oa. 


DC 
B 


* HOUTINE 


EROA 8 
BC 


XL1°OA! 
XL1*008 
AL2 (RTNOB) 


PATRN (2) ,HOOAA 


X'3C8 xXt3C' 


PATRN, X* 42? 
LSCK,Xt42* 


UFFFP (1),LSCK 
EROA 


LSCK-1,X*00'8 


LIOSNS 

XL1*Oa?* 
CLi* 2" 

LINK 


MAPS 
XL2'891773 
HALT 
RLQ*Qooat 
LINK 


ERROR MESSAGE * 


PEINT 

AL.7* C2? 
TLI'43° 

AL 2 (LiORST) 
XL2*4oo0ct 
RAPS 
XL2°8942" 
HALT 
¥L2°*HO00C! 
LINK 


LIO & SNS LENGTH COUNT REG WITH AA. . 


ROUTINE NUMBER 
NO MANUAL INTERVENTION REQUIRED 
ROUTINE OB ADDRESS 


STORE TEST PATTERN. 
PRINT TEST HEADING. 
TEST FOR SSW 10. 
HALT ~FPF- IF ON. 


LOAD LENGTH COUNT REG WITH ~AA~. 
SENSE STATOS 6&6 LCR FOR ~-SORKA~. 


WAS OLD PATTERN FERASED ? 
JUMP IF NOT ERASED. 


CLEAR STA‘ US BYTE. 

GO COMPARE RESULT WITH EXPECTED. 
“ERROR TD. 

RETURN TO DCP IF OK. 

POINT TO MAP CHART. 

~PAGE 891, ENTRY 1. 

FRROR HALT ~-OA~. 


RETURN TO DCP. 


PRINT LENGTH COUNT NOT 


POINT TO MAP CHART. 
~PAGE 891, ENTRY 2. 
BRROR HALT ~OC-. 


RETURK TO DCP. 


PROG 
PAGE 


EC WO. 824765 B24a79 


IBS MAINTENANCE DIAGNOSTIC PROGRAS 


411 3741 PUNCTION TEST WITHOUT 


ER&@ LOC OBJECT CODE ADDR STAT 


1C7D 1C8F 
O2TA 


oC 
00 
0 EC7 


0C 03 1C7D 1€93 
0218 


JATE TOAUGTH TSNOV74 
EC NO. @24765 B24870 


531 
532 
533 
534 
535 
536 
537 
538 
539 
540 
544 
542 
543 
544 
545 
546 
547 
548 
549 
550 
551 
552 
553 
554 
ao5 
556 
557 
558 
559 
566 
561 
562 
563 
564 
565 
566 
567 
568 
569 
570 
571 
572 
573 
574 


576 


579 
580 
581 
582 
583 
584 


586 
587 
588 


A tits iy! aa PE EM 


PAGE 14 


PART NO. 5558421 
PAGE 5 


THE WRAP CORWECTOR 


SOURCE STATEMENT 


HEE REKERE 
* RTNROB * 
KER EE ON EERE EAE EERE ERASE SEEKS EERE EE EEE EERE RS ERE EEK EEE REE NEDRES & 
e | 
* ROUTINE OB LIO & SWS DATA ADDRESS REG WITH EVEN TEST 
* PATTERNS, ~5SSAA- AND ~AR55~. 
* 
ERERERE EERE RTEREEEEERRERES EKER EEE EEE EREK EKER EEG TEE KEREKRKEKEKED 
RBTNOB DC XLI°C¢ 2? ROUTINE NUMBER 

DC XL1°OO! WO MANUAL INTERVENTION REQUIF ED 

DC AL2 (RTNOC) ROUTINE OC ANDRESS 


YNOD (4), EVEN SET UP EVEN TEST "IEADING. 
PRINT PRINT TEST HEADING. 

XL1' 46! 

ILi'56* 

AL2 (LSDAR) 

XL2*40AB! 


QUES TEST FOR SSW 10. 
K*3ct,xt3c% HALT ~FF- IF ON. 


HSSAA,X'44! LOAD DATA ADDRESS REG WITH -SS5AA~. 
LSCK,X'4qr SENSE DATA ADDRESS REGISTER. 
H55AA(2) ,LSCK DATA SENSED = DATA LOADED ? 

DARCK 


HAASS,x*4y? LOAD DATA ADDRESS REG WITH ~AA55~-. 
LSCK.~X'ho' SENSE DATA ADDRESS REGISTER. 

HAASS (2), LSCK DATA SENSED = DATA LOADED ? 

LINK 


PRINT 
XL1°C6" DAR NOT SENSED AS LOADED 
AL1 (MSG4~™SG4B) 

AL2 (MSG4) 


MAPS MAP CALL OUT 
XL2Z*'89 73! ~PAGE 891, ENTRY 3. 


HALT HALT DUE TO DAR CHECK 
XL2°*4O067" 


LIWK RETURN TO DCP. 


REEREESK EK 
* RTNOC * 
CHEK SEEKEEKASEEKEKEKERK AE RAR ERK ASEKEKEREEERERKEEER SKERKAAE CEEKEKREKE RE 
b 4 
* ROUTAUNE OC LIO & SHS DATA ADDRESS REG WITH ODD TEST 
* 
REREREKERA EEE E TREE KEKE ER ERE EKER ERE ERE KERR KREKREREEAEORERKOEREKADK ERR ERE 
RTNOC DC XLI*OCc! ROUTINE NUMBE 
bc Xi. 1* 00? NO MANUAL INTERVENTION REQUIRED, 
DC AL2(RTNOD) ROUTINE OD ADDRESS 


VNOD(4) ,ODD SET UP HEADING POR ODD PATTERNS. 
PRINT PRINT THST HEADING. 

XL1° 46) 

IL1*56! 

AL2 (LSDAR) 

XL2‘GOac? 


QUES TEST FOR SSW 10. 
AP SC* 30? HALT -FF~ IF OW, 


—_— SS or a aa iad BRB wer &s er ev de 4 y 
a fii NY a iad te 


_ BC NO. 824765 824870 | paee Na ep Se 


PART NO. 55584217 
PAGE | SA 


40141 3741 FUNCTION TEST WITHOUT THE WRAP CONNECTOR 


“ERR LOC OBJECT CODE ADDR STMT SOURCE STATEMENT 


OEB3 31 44 1884 599 LIO H1000,X'4us LOAD DATA ADRS REG WITH ~1000-. 
OEB7 30 44 1917 600 SNS LSCK ,X'4ut SENSE DATA ADRS REGISTER. 


601 
QEBB 371 44 18D0 602 LIo HOOO1, X*44! LOAD DATA ADRS REG WITH ~0001-. 


OEBF 30 44 1917 603 SNS LSCK,Xtuu! SENSE DATA ADRS RFGISTER. 


604 
OEC3 CO 87 0216 605 B LINK RETURN TO DCP. 


PROG IO 
PAGE 


 DARR 16aUCTS 15 NOVT4 
BC NO, 924765 Q E870 


EC Noe 


824765 


B248706 


IBM MAINTENANCE DIAGNOSTIC PROGRAS 


4311 


ERR LOC OBJECT CODE 


3741 FUNCTION TEST WITHOUT 


ADDR STAT 


1919 1886 


1800 
175D 
3C 


1919 
1917 


1916 


1488 


02 16 
17D9 
0222 


0216 


1919 
1800 


175D 
3c 


1919 
917 


19 16 


1488 


0216 


1759 


0222 


0216 


T6AUG7S 
824765 


TSNOVIY 
£24870 


607 
608 
609 
610 
611 
672 
6713 
614 
615 
616 
617 
618 
619 
620 
621 
622 
623 
624 
625 
626 
627 
§28 
629 
630 
631 
632 
633 
634 
635 
636 
637 
638 
639 
640 
641 
642 
643 
644 
645 
646 
o47 
648 
649 
650 
651 
652 
653 
654 
655 
656 
657 
653 
659 
660 
661 
662 
663 
664 


THE WRAP CONHECTOR 


SOURCE STATEMENT 


RHEREKEEEE 


* RTNOD * 
EREEEEKRERAE TERCERA EEK ESEEKE TERR AEEEREREEAREEREEE EERE EEE EEE ER KE EEE & 


* 
* 
x 


ROUTINE OD 


PART NO. 5558421 
PAGE 6 


LIO & SNS DATA TRANSFER REG WITH 55. 


CARRE EEK EEE EKEKEKERKEAREERK EEE SEER ERE EERERESREEE EERE REREREEE ZEEE KE 


RTWOD 


DC 


pc 


bc 


Pere ele eS 


* RTINOE * 
TELA EMRE EKER RARE HEE EKER EERE EERE EERE REESE EERE REESE EERE RREKRRERE ERK EK E 


* 
x 
* 


IL1* Op 
XL1°008 
AL2 (RTNOB) 


PATRN(2) ,HOO5S 


CODE 
CL1°5* 


QUES 
X'3C*,x'3c! 


PATRW,X"45'* 
LSCK,X'4s? 


LSCK-1,x'"C0! 


LIOSNS 
XL1*10? 
CL1*:54 
LIWK 


MAPS 
XL2*8931* 
HALT 
XL2'*4010! 
LIK 


ROUTINE OF 


ROUTINE NUMBER 
WO MANUAL INTERVENTION REQUIRED 
ROUTINE OF ADDRESS 


STORE TEST PATTERN. 
PRINT TEST HEADING. 


TEST FOR SSW 10. 
HALT -PF~ IF ON. 


LOAD DATA TRANS REG WITH -55-. 
SENSE DIAG AND DTR FOR -0055-. 


CLEAR DIAGNOSTIC SYTE. 


GO COMPARE RESULT WITH EXPECTED. 
~ERROR ID. 

~M CODE. 

RETURN TO DCP IF OK. 


POINT TO MAP CHART. 
~PAGE 893, ENTRY 1. 
ERROR HALT ~10-. 


RETURN TO DCP. 


LIO & SWS DATA TRANSFER 


REKEEKKSKKEKKEKESEKREEKEKRERKAEKE AKER EKKEEKAEEKEKEEEEKEKEEEK EKA EK ER ERAEKE 


RTNOE 


bc 
bc 
DC 


XL1‘OF* 
XL1'O0' 
AL2 (RTNOF) 


PATRN (2) ,ROOAA 
CODE 
CL1'5* 


QUES 
xY3C",X*3Ct 


PATRN, X*45! 
LSCK,xX'45' 


LSCK-1,x°00! 


LIOSNWS 
XL1* 717° 
CLI*S" 
LINK 


MAPS 
XL2°8931" | 
HALT 
XE2°40171' 
LINK 


ROUTINE NUNBER 
NO MARGAL INTERVEVTION REQUIRED 
ROUTINE OF ADDRESS 


STORE TEST PATTERN. 
PRINT TEST HEADING. 


TEST FOR SSW 10. 
HALT -PP- IF ON. 


LOAD DATA TRAHS REG WITH ~AA~. 
SENSE DIAG & DIR FOR -OQOAA~. 


CLEAR DIAGNOSTIC BYTE. 


GO COMPARE RESULT WITH EXP2CTED. 
~ERROR ID. 

~N CODE. 

RETURN TO DCP IF OR. 


POINT TO BAP CHART. 
ERROR HALT ~11-. 


RETURE TO DCP. 


OBS MAINTENANCE DIAGNOSTIC PROGRAM 


5 
bs 
a 


3741 FUNCTION TEST WITHOUT 


 4oM 


“ERR LOC OBJECT CODE ADDR STAT 
676 
677 
678 
679 
680 
681 
682 
OF3P OF 683 
OFSO 00 coy 
OF41 OFC 685 
6 86 
OF43 CO 87 1576 687 
OF47 AF 688 
OFS8 EB2C5E3240C5D5C 1C2 689 
OF50 D3C540C9IDSE3IC5D9 689 
OFS58 DIES D7TESS0D3C1E3 689 
OFoO CICB4B4O4D | 
OF65 C1 17BF 
OF69 18FA 
OF6D 18C1 
OF71 87 175n 
OF75 3c 


OF78 
OF7C 
OF7F . 
OF 83 
OF87 
OFS A 
OFSE 
OF92 
OF 93 


OF9? 
OFIB 
OF 9D 


OFA1 
OFA 3 


OFAT 
OFAS 
OFAC 
OFAD 
OFAF 
OFB 
OFBS 
OFB7 
OF BB 
OFBL : 


OFC 1 
OFC2 
OFCY 


CO 87 1576 

BO OFCS 
DICH E2CEEI4OCSDS OPES 
CIC2D3C540C9D 583 
CSD9D9 B4 D7 ES4OD3 
CIBICIC84B 

Ci 42 i7BF 


T5HNOVTY 
824870 


1SAUG74 
824765 


THE WRAP CONNECTOR 


SOURCE STATEMENT 


KEE EREK EK 
* RTNOF * 


BARRELS EERE ER EEE RTE ATER EKER EEE EKER OK ERR EATER EEE REE EK EER 


* 


x ROUTINE OF 
x 


ERK EMER REE REAR EEE ERE RR ERA EERE ER EERE ERE KE EERE ERE KEKE ER ERKEEEREEAE ERE 


RTNOF DC XL140F* 
pc XL1'00" 
pc AL2 (RT N10) 


STOHD 
XL1*AF* 


PART WO. 
PAGE 


ISSUF A SIO ENABLE INTERUPT. 


ROUTINE NUMBER 
NO MANUAL INTERVENTION RFOUIRED 
ROUTINE 10 ADDRESS 


PRINT TEST HEADING. 
SZSSAGE ID. 


CL29'SET ENABLE INTERRUPT LATCH. ° 


DROPD, x*42! 
INTRS,TARS 

FLAG,X‘'O1" 

QUES 

XOZC*  XI3C! 


ROOBO,X'G1! 
K'02',x*40! 
DTR,X'45! 
FLAG,X?01° 
BADINT 
XPCT,X" 108 
CKSIO 
XL1°12? 
LINK 


NAPS 
XL2*a95t' 
HALT 
XL2‘°4612% 
LIWK 


PRINT 
XL1°C2! 
TL1'21" 
AL2(SI0C4) 
XL2'°4O01A" 
MAPS 
XL2'8952" 
HALT 
XL2°401A' 
LENK 


BADINT 


Reto F aR hk 
* RTNIO * 


RAKE SURE 3741 2S WOT BUSY. 

LOAD TAR 5 REGISTER. (IN CASE OF INT) 
RESET ERROR FLAG 

TEST FOR SSW 10. 

H&4LT -FF- IF ON. 


SET FUNC REG TO DIAG MODE. 
ISSUE ENABLE INTERROPT. 

SENSE DIAG BYTE FOR ~10~-. 
ERROR FLAG SET ? 

JOMP IF SO. 

STORE EXPECTED RESULT. 

GO CHECK EXPECTED WITH RESULT. 
ERROR ID. 

RETURN TO DCP IF OK. 


POINT TO MAP CHART. 
~PAGE 895, ENTRY 1. 
ERROR HALT ~12-. 
KETIRN TO DCP. 


PRINT INTERRUPT CHECK. 


PRINT MAP CHART R FEPERENCE, 
ERROR HALT ~TA-. 


RETURN TO DCP. 


KEKE REE RE ERK ERK REE ERE KE EERE S EKER KEE EERE ARE ER EKREE ER ERERAEAEEE KEKE 


e 


* ROUTINE 10 


Prd 
“ia 


ISSUE A RESET INTERRUPT. 


EKER ERE EK EEK ERE ERR EAE EKRE REESE SKE KEKEEEEKEREAEREKEEE RAK KK ERS SE 


RTN10 dC XL1* 108 
DC XL1*00! 
ss AL2(RTN11) 


B SIOHD 
DC XL1* BO! 


ROUTINE NUMBER 
NO INTERVENTION REQUIRED 
ROUTINE 117 ADDRESS 


PRINT TEST HEADING. 
MESSAGE ID. 


DC CL29°RESET ENABLE YNTERRUPT LATCH." 


DROPD,X*42! 


NAKE SURE 3741 IS NOT BUSY. 


PROG ID 
PAGE 


y 
q 
4 
E 
i 


IBA MAINTENANCE DIAGNOSTIC PROGRAM 


4011 3741 FUNCTION TEST WITROUT THE WRAP CONNECTOR 


ERR “LOC OBJECT CODE ADDR STNT SOURCE STATEMENT 


OFEB Vf. 728 B QUES TEST FOR SSW 10. 
OFEF 739 HPL X*3C'.23C" HALT ~FF~ IF ON. 
: 7420 
OFF2 | 744 LIo HOOBO,X*47! SET TO DIAGNOSTIC MODE. 
OFF6 742 SIO £902', x*uor ISSUE ENABLE INTERROVPT. 
OFP9 743 SIo K*O4",X'40" | ISSUF INTERRUPT RESET. 
OFFC . 74a SNS DTR,X*45! ra SENSE DIAG BYTE FOR -O00~-. 
745 ; 
1000 746 TBN DTR~1,X* 10 * DID ENABLE BIT GET RESET ? 
1004 7a BP LINK RETORN TO DCP IF YES, 
748 
749 * ROUTINE 10 ERROR MESSAGE * 
750 
751 PRINT PRINT RESET CHECK. 
752 XL7'c2°5 
753 TL 4* 293 
754 AL2 (INT R) 
755 KL2°80173! 
756 MAPS POINT TO MAP CHART. 
757 ¥L2'*8971! ~PAGE 897, ENTRY 1. 
758 
759 HALT ERROR HALT ~13-. 
760 XL2° 4013" 
761 LINK RETURN TO DCP. 
762 
763 
764 *eeeket ae 
765 * RTNI1 * 
166 FREER ER EEE RER ER ERE EERE EEE RH ERE NER EEE EEE REET ERE RARR RRR REKORN ERK KEKE 
767 * 
768 & ROUTINE 11 ISSUE A READ COMMAND. 
769 * 
TI Q ERE REREEEEE EERE EEE RER ERE SERRE EER EEE SE REECE EERE RE EEK EREREREEEEERAES 
771 RTNI1 DC XL7° 11+ ROUTINE NUMBER 
Th2 pc XL7*°00* NO MANUAL INTERVENTION RFOUIRED 
7173 pc AL2 (RTN12) ROUTINE 12 ADDRESS 


CO 87 1576. B SIOHD PRINT TEST HEADING. 

B1 <A 6776 DC XLI‘' BT MESSAGE Ib. 
E2CSEI4OD9ICSCICS 77 DC CL29*SET READ CALL LATCR.? 

8O0C3C1ID3D340D 3C1 177 

EIC3ICB4BNOND4O4RD 77 

KOUDKOKOND 177 

C1 42 175P 778 DROPD,X*42' MAKE SURE 3741 IS NOT BUSY. 


co 175D QUES TEST FOR SSW 1C. 
FO 3c 781 RP 3C! X*3C" HALT ~FF- IF ON, 
7862 
33 1BDE ; 783 HO080,xX'41" SET TO DIAGNOSTIC MODF. 
3 00 SIc X*O0*,x*41" ISS0S A READ CALL. 
17BP TIOERB,X'4&2? BRANCH YF 3741 BUSY. 
TBFC S DTE, X45? SENSE DIAG BYTE FOR -03-. 


19 1C RECT .X'OGt STORE EXPECTED RESULT. 

15 BO CKSIO GO CHECK EXPECTED WITH RESULT. 
XLP*' 7a" EWRGR YD. 

1O7F DORST GO CHECK FOR RESET IF OK. 


17D9 NAPS POINT TO MAP CHART. 
; XL2°8991° ~PAGE 899, ENTRY 1. 
0222 ) HALT ERROR HALT -14~-., 
XE2°eO Te 
0216 LINK RETURN TO DCP. 


08 X'O8', £408 DO A READ CALL RESET. 
18FE TEBP,x?4ss SENSE DXYAG BYTE FOR -00-. 
10 EA CKRST GO CHECK DIAG BYTE FOR RESFT. 


T6A0G74 T5BOVTY PROG ID 
824765 824879 PAGER 


3741 FUNCTION TEST WITHOUT 


~ BRR LOC OBJECT CODE 


108A 12 
108B 00 
108C 1118 


108E CO 87 1576 
1092 B2 


1093 E2CSEZ4OESDICIES 


109B C540C3C1D3D 


340D3 


10A3 CTEICICS4SBUDKOND 


10AB 8040804040 
10B0 C1 17 BF 


10B4 co 
10B8 FO 


10BB 
10BF 
10C2_ 


10C46 
10CA 
10CE 
TOCP 


10D3 
10D7 
10D9 


TODF 


1OF3 
10 ES 


TOBA 
10EE 
10F1 
10F5 


10F9 
TOFD 


TOPE CO 87 
1192 C2 
1103 1B 
1794 1D2B 
1106 4016 
1108 CO 87 
110C £992 
110E c9. 87 
1112 4016 
1114 CO &7 


16A0GC74 
824765 


“parE 
EC NO. 


15NOV7 
824870 


ADDR STNT 


803 
804 
805 
806 
807 
808 
609 
810 
871 
812 
813 
B14 
815 
816 
81? 
817 
817 
617 
818 
819 
820 
821 
822 
823 
S24 
825 
826 
827 
828 
829 
830 
831 
832 
833 
83h 
835 
836 
837 
838 
839 
B40 
Bu 
B42 
843 
B44 
B4S 
846 
847 
848 


850 


852 
853 
854 
855 
856 
657 
858 
859 


4 


THE WRAP CONNECTOR 


SOURCE STATEMENT 


KEK KER ER 
* RTWN12 * 


REMAKE EERE ERK EEESEEE KECK EEEREREEESEREKEEREEKEKREKKEEE EERE EKRE EKER K 


ae 


¥ ROUTINE 12 


x 


HRA RRR RHC RR RO IO RE REE EERE REREAD 


RTNI2 DBC 


CRRSTT 


CKR ST 


XL1! 12° 
XL1'008 
AY, 2 (RTN13) 


SIOHD 
XL1*B2* 


PART NO. 


ISSUE A WRITE COMMAND. 


ROUTINE NUMBER 
NWO L.ANUAL INTERVENTION 
ROUTINE 13 ADDRESS 


PRINT TEST HEADING. 
MESSAGE ID. 


CL29"°SET WRITE CALL LATCH.! 


DROPD,X* 42° 


QUES 
ASC * 427 3C" 


HOO8O,xX*ui! 
X'00t, xt42s 
DTR,X*45* 


XPCT ,X"05' 
CKSIO 
XL1°15* 


CKRSTT 


MAPS 
X~L2°90317? 
HALT 
KL2°40 15° 
LINK 


X'O8!', KAO! 
TEMP,X*45"* 


TENP-1,xX'008 
ERST 
RTN#,X115! 
LINK 


LOAD 
XL1'00°5 


PRINT 
XL1‘'C2" 
IL? 27! 
AL2(NTRST) 
XL2* 40168 
MAPS 
XL2'8992' 
HALT 
X~L2'4016! 
LINK 


MAKE SURE 3741 IS NOT BUSY. 


TEST FOR SSW 10. 
HALT ~FF- IF ON. 


SET TO DIAGNOSTIC MODE. 
ISSUE A WRITE CALL. 
SENSE DIAG BYTE FOR -05-. 


STORE EXPECTED RESULT. 

GO CHECK EXPECTED WITH RESULT. 
ERROR ID. 

GO DO RESET IF OK, 


POINT TO MAD CHART. 
~PAGE 3903, ENTRY “*. 
ERROR HALT -15~. 
RETURN TO DCP. 


DO WRITE CALL RESET. 
SENSE DIAG BYTE FOR ~00-. 


DIAG BYTE RESET TO ~-00- ? 
JUMP IF NOT. 

CHECKING RESET FROM RTN15? 
RETURN TO DCP IF NOT. 


BRANCH TO DCP TO TERMINATE SECTION, 


PRINT 3741 NOT RESETTING SBESSAGE. 


POINT TO MAP CHART. 
~PAGE 899, ENTRY 2. 
ERROR HALT ~16-. 


RETURN TO DCP. 


§558421 
PAGE 7A 


IBM MAINTENANCE DIAGNOSTIC PROGRAM PART NO. 5558421. 
> PAGE an 


{ 


4011 3701 FUNCTION TEST WITHOUT THE WRAP CONNECTOR 


| ERR LOC OBJECT CODE ADDR STMT SOURCE STATEMENT 


862 «eee Genes ! 
863 * RTN1I3 * 
864 KEE EEREREEE EERE EERE EEE ERE RE ERE REE ERE EEE EER ERE EREREREREHEEEE REE KR ES 
865 * 
866 * ROUTINE 13 ISSUE A CONTROL 1 SIO. 
867 * | * 
868 CER EREREEE EERE RAKE EREREE AER ERE ERE RE ER EREE OE KEAKEEEE EERE E REA EERE EREEKE 
13 869 REN13 DC XL7'°13" ROUTINE NUMBER 
00 870 pc XL1'00! NO MANUAL INTERVENTION REQUIRED 
1154 871 Dc AL2 (RTN14) ROUTINE 14 ADDRESS 
872 
CO 87 1576 873 B SIOHD PRINT TEST HEADING. 
B3 B74 pc XL 14 B34 MESSAGZ ID. 
C4D640C3 DED523D9 875 DC CL29"°DO CONTROL 1 START I/0.! 
D6D380F 140 £28371 875 
DIE340C96 1D64F,40 875 
4040404040 875 
C1 42 17BP 876 DROPD,X*u2t MAKE SURE 3781 IS NOT BUSY. 
877 
CO 87 175D 878 QUES TES™ FOR SSW 10. 
FO 3C 3c 879 Xt*3ct,x*3ce HALT ~PF~ IF ON. 
880 
31 41 18D,’ 881 ROO80, X*44? SET TO DIAGROSTIC MODE. 
F3 43 FF $82 X°FP*, x43! ISSUE CONTROL 1 SIO. 
883 
CO 87 0216 884 LINK RETURN TO DCP. 
885 
886 
887 SEK KEKKA EK 
888 * RTNW14 * 
889 ERE RER ERE EERE ERE ERE EERE EKER ER ARERR RE EEE ERE RERERERKAREK ERRORS 
890 * 
BO. * ROUTINE 14 ISSUE CONTROL 2 SIO. 
892 * 
893 ERE EEE EERE ERE EERE ERE REE EERE ERR REKEE REE ERR EEE EE KEKE ARK ERKEEEERKEESE 
894 RTN14 DC XL1* 149 ROUTINE NUMBER 
895 Dc XL1*00' NO MANCAL INTERVENTION REQUIRED 
896 pc AL2 (RTN15) ROUTINE 15 ADDRESS 
997 
CO 87 1576 898 B SIOHD PRINT TEST BEADING. 
BY 899 pc XL1'B4t MESSAGE ID. 
C4D640C3D6 DSE3D9 960 pc CL29"DO CONTROL 2 START I/0.! 
D6D3I4OF2Z4U0R2E 3ci 900 
DIE3480C9I61D64 B40 900 
6040404040 900 
CO 87 175D 901 QUES TEST FOR SSW 10. 
Y 3c 3c 902 X'3C",x'"3c8 HALT -FY- IF ON. 
903 
31 18CZz 90u HOOOO, xtut? REMOVE FROM DIAGNOSTIC NODE. 
C1 17BF 905 DEOPD, ¥*42° MAKE SURE 3741 IS NOT BUSY. 
F3 44 FP 906 X'PRY x euy? ISSUE CONTROL 2 SIO. 
307 
co 0216 908 LINK RETORN TO DCP. 
909 
919 
Oty ex ekeune 
972 * RTNI5 * 
973 BER SSE EER SEK SR EEHEARRERERE SEES EERE RK ERERR EEE EERE KERR EEE EERE EERE 
Sty « 
915 + ROUTINE 15 ISSUE A SIO TO SET/RESET THE NO-OP LATCH. 
916 * 
917 SER PREN AEE GEER ERER ERED SE RES REA ELE TEES RE REA EEE EEE EERE SRR EREKES EERE EE | 
1190 15 110 918 RTN15 pc XL1*75* ROUTINE NUMBER : 
1191 00 1191 919 pc YL1*008 MO INTERVENTION REQUIRED 
1192 1223 1193 920 DC AL2 (REN 1G} ROUTIRE 16 ADDRESS 
924 
1194 CO 87 1576 922 B SIOHD PRINT TEST HEADING. 
1198 BS 1198 923 pc XL1*B5? MESSAGE ID. 


DATE T6AUGT4 TSHOVTK PROG ID 
EC NO. $24765 824870 PAGE 


ata eta nen 
eee ate aos rae 


IBA MAINTENANCE DIAGNOSTIC PROGRAM 


4911 
“ERa Loc 


1199 
11A1 
1749 

1231 


11B6 


T1BA 
11BE 


i1c7 
115 
11¢8 
11CC 
11D0 


11D3 
1107 
T1DB 
11DE 


11E2 
11E5 
11£9 


TTED 
T1F1 

11F2 
V1P3 
11F5 
11F7 
TIFB 
TIFD 
1201 
1203 
1207 


1208 


3741 FUNCTION TEST WITHOUT 


OBJECT CODE 


E2C5E34OCIDSC4XO T1B5 


DICSEZC5SE3R0D 5D6 
d0D6 D740 D3C1E3C3 
CB8SB404040 
C1 42 17BF 


87 
3¢ 


47 
44 


129C 


120D 
1208 
1210 
1212 


1216 


1218 
121e 
121E 
1222 


16 
80 
FPF 


oc 03 190D 0002 
OC 03 0003 18F6 


ct} 87 O2TA 


G2 1237 
33 1238 


TSNOVTS 
R24870 


824765 


924 
924 
924 
924 
925 
926 
927 
928 
929 
930 
931 
932 
933 
934 
935 
936 
937 
938 
939 
940 


943 
944 


946 


948 
949 
950 
951 
952 
953 
954 
955 
956 
95 

958 


961 
962 
963 
964 


967 
968 
969 
970 
971 
972 
973 


976 
977 
978 
979 


981 


983 
Sau 
985 
986 
987 


THE WRAP 


* ROUTINE 15 


FI3A 


pC 


TIO 


B 
APL 


LIO 
sito 
SNS 
TBN 
JF 


SNS 
TBRN 
JT 

TIO 


STO 
SNS 
B 


B 
BC 
DS 
DC 
DC 
B 
oc 
B 
DC 
B 
DC 


B 
nC 
DC 
DC 
DC 
B 
DC 
B 
pe 
B 
DC 


KEKEKEKR ED 


* RBTNI6 * 2 
CEKREKEEERRKRKRERE REE EEE RE AEE EE KERR EERE EEE RHEE EEE EEE KER EER AKER EH E | 


* 
* 
¥ 


ROUTINE 16 


CONNECTOR 


ADDR STMT SOURCE STATEMENT 


PART NO. 555 8421 
PAGE 8A 


CLOO'SET AND RESET NO-OP LATCH.* 


DROPD, X* 42" 


QUES 
X*3C",X'3C! 


HOOOOD,X*44# 
X'OO*, x41? 
LCR, X'42! 
LCR~1,X*04! 
E13 


WORK, X442° 

WORK-1,X'0Q" 
E13A ‘ 
YTOERB,X'&7* 


K'O08*,K*uor 
TEMP,X*45! 
CKRST 


ERROR MESSAGES * 


PRIN‘ 
KL1°C2! 
SL1'27° 
AL2 (NORES) 


XL2'4018t 


MAPS 
XL2'9052* 
HALT 
XL2'40 18! 
LOAD 
XL7'O0O! 


PRINT 
XLI'c2¢ 
IL1*25' 
AL2 (NOSEF) 
XL2*4017" 
MAPS 
XL2'9051' 
HALT 
XL2°4017" 
LOAD 
XL1*00 8 


MAKE SURE 3741 IS NOT BUSY. 


T4ST FUR SSW 10. 
HALT -FF- JF OW. 


REMOVE FROM DIAG NODE. 

ISSUE A READ CALL. 

SENSE STATUS FOR ~84-. 

NO-OP BIT ON IN FIRST STATUS ? 
BRANCH IF NO-OP NOT ON. 


SENSE STATUS FOR ~80-. 
NO-OP BIT RESET ? 

BRANCH IF NO-OP NOT RESET. 
BRANCH OUT IF 3741 BUSY. 


DO READ CALL KESET. 


SENSE DIAG BYTE FOR -00-. 
GO CHECK RESET RESULTS. 


PRINT NO RESET ERROR. 


POINT TO MAP CHART. 
~PAGE 905, ENTRY 2. 
ERROR HALT -18-. 


GO TERMINATE SECTION. 


PRINT LATCH SET CHECK. 


POINT TO MAP CHART. 
~PAGE 905, ENTRY 1. 
FRROR B°UT «-17-. 


GO TERMINATE SECTION. 


TEST ALL INVALID N CODE COMMANDS. 


{DIAL IN ONLY} 


EKER KEKECER EE KAEREEHEEKEEE ESE REEEKRSEKEKEKEE EERE EEK EKE EKER EKER AEE E | 


fTN16 


XL 1° 16° 
XL7°80! 
XL2'PFFF* 


WORK (4) ,3 
3 (4) ,BRNCH 


PRINT 
XL1* 42° 
ILV*51'* 


ROUTINE NUMBER 
MANUAL INTERVENTION REQUIRED 
LAST ROUTINE . 


SAVE BOTTOM CORE OF DCP. 


STORE SPECIAL ‘BRANCH BACK! C#ND. 


PRINT TEST HEADING. 


2BM MAINTENANCE DIAGNOSTIC PROGRAM 


4071 
ERR LOC 


1239 
1233 
123D 
1241 
1242 
1243 
1245 
1249 
124A 
i248 


124D 
1251 


1233 


1257 
1255 
1261 
1265 


125A 
1270 
1274 
1278 


127D 
12283 
1287 
1288 


1290 
1296 
129A 
T29E 


i2aA3 
T2A9 
I2ZAD 
12B1 


12 B6 
12BC 
12C0 
TZCu 


i209 
V2CF 
12D3 
1207 


12DC 
1Z2E2 
12E6 
T2EA 


T2EP 
12F5 
V2FS 
12FD 


1302 
1308 
130C 
1310 


3741 #UNCTION TEST WIHOUT 
OBJECT CODE 


989 
990 
997 
992 
993 
994 
995 
996 
997 
998 
299 
1060 
1001 
1002 
1003 
1004 
1005 
1006 
1907 
7008 
1009 
1010 
1017 
11zZ 
1013 
1014 
1075 
1016 
1017 
1018 
1019 
1920 
1027 
1022 
{023 
1024 
1025 
1026 
1027 
1028 
1029 
1030 
1931 
1932 
1033 
TO34 
1035 
1036 
1037 
1038 
1039 
1040 
1041 
1042 
1043 
10644 
1085 
1046 
1047 
1048 
10489 
1050 
10517 
1052 
1053 
1054 
1055 
1056 


123k 
IW23¢€ 


IDDD 
4 0B6 
CO 87 O21A 
02 1241 
| 1222 
1244 
CQO 87 O21A 
06 1249 
37 T2Uh 
1E38 124¢ 


C9 87 
GOER 


0222 
1252 


CQ 87 123D 


OF 01 0003 
30 40 16°F 
CO 87 1378 
E2D5E240F0 


OF 01 0003 
30 46 1° PE 
CO 87 1378 
E2ZD5E24 0F6 


OE 01 0003 
30 47 18FE 
CO 87 4378 
E2DSE2S0F7 


QE O14 0003 
<1 40 18CE 
CO 8? 1378 
DIC 9DB40FO 


QE 01 0003 
31 43 18CE 
£O 8&7 1378 
D3C IDESOF3 


QE OT 0003 
31 46 18CE 
CU B87 1378 
DIC 9ID64 OFS 


QE 01 0903 
31 47 18CE 
CO 87 1378 
D3IC9INDE4U OFT 


T8DA 


QE O1 0003 
C1 471 12E6 
CQ 87 1378 
BICIDE4SOFY 


06 O01 0003 
CT 4&4 12F9 
CO 87 137B 
ESC IDELOFY 


VE 07 0003 
C1 45 130C 
CO 47 13723 


BIC IDES ORS 4314 


TSNOVTA 
B28876 


T6AUGTA 
824765 


THE WRAP CONNECTOR 


REPIT 


DC 
DC 
B 

DC 
DC 


ADDR STMT SOURCE STATEMENT 


AL2 (INVAL} 
XL2"4UOB6* 
PRINT 
XL1402! 
IL7*36! 
AL2 (INVL) 
PRINT 
XL1#06? 
TL1*55# 
AL2 (IVL) 


HALT 
XL2'4OEE?! 


REPIT 


INVALID SENSE I/O CODES. 


ALC 
SNS 
B 
DC 


DC 


3(2) ,N019 
TEMP, Y'uo? 
ER14 

CL5'*SNS O08 


3 (2) ,NG19 
TEMP, X'U6! 
BRIG 

CLS*SNS 6° 


3(2) ,N019 
TEMP, X'U7 
ER14 

CLS'SNS 7° 


INVALID LOAD I/O CODRS. 


ALC 
LIO 
B 
BC 


DC 


3{2) ,N019 
HOOO0O0,xX'40! 
ER 14 

Cio ELo 0+ 


3 (2) ,NO19 
HD000, X'43? 
BRIG 
CL5*LTO 3? 


3(2) ,N0O19 
HCOO0,X*46" 
ER V4 
CLSO"*LIO 6! 


3 (2) ,6019 
HOOOO,X*4T7 
BRIG 
CL5'*LIO 7° 


INVALID TIO N CODES. 


ALC 
TIO 
B 
pc 


3 (2) ,K019 
*+4,xtut? 
ER14 

CL5'Tr0 1! 


3 (2) , "019 
eeu, Xe uu 
BR14 
CL5'TIO 4! 


3 (2) ,N019 
4G, X45" 
BRIY 

CL5'*TLoO 5 


PART WO. 
PAGE 


PEINT REST OF INSTRUCTIONS. 


OPERATCR HALY -EE-. 


REPEAT IF NO SYSTEH RESET. 


IRCR RETORN ADDRESS. 
WN = 0. 
BRANCH IF CMND ACCEPTED. 


INCR BETURN ADDRESS. 
N = 6. 
BRANCE IPF CHND ACCEPTED. 


INCR EETORN ADDRESS. 
N= 7. 
BaANCR ITF CMND ACCEPTED. 


IHCR FETURN ADDRESS. 
N= 0. 


BRANCH IF CMND ACCEPTED. 


IRCR RETURN 
H = 3. 
BRANCH IF CHND ACCEPTED. 


ADDRESS. 


INCR RETURN ADDRESS. 
N= 6. 
BRANCH IF CMND ACCEPTED. 


IWCR RETURN ADDRESS. 
N= 7. 
BRANCH IF CMND ACCEPTED. 


INCR RETURN ADDRESS. 
N 1 
BRANCH IF CMHND ACCEPTED. 


INCR RETORN ADDRESS. 
N = Ma. 
BRANCH IF CHND ACCEPT*SD. 


IWCR RETURN ADDRESS. 
N= 5. 
BRANCH IF CAHND ACCEPTED. 


PROG ID 
PAGE 


5558421, 
9 f 


BA BAIENTENANCR DIAGNOSTIC PROGRAS 


4011 3741 FUNCTION TEST WITHOUT THE WRAP CONKECTOR 
ERR LOC OBJECT CODE ADDR STMT SOURCE STATEMENT 


1057 
tat OE Ot oe eek toss ALS -3(2) , "019 INCRE PRTOEN ANDRESS 
131B C1 46 1351F 1059 TIO oO Krust Woz & 
131F CO 6&7 1373 1060 R nR YY 
1323 B3IC9D640 Fé 1327 1001 OC CLO T7TO: 6" 

1062 
1323 OB 07 0003 18D. 1063 ALC 3(2) ,G19 IWOR RETURN POOP RSS, 
132E Ci 47 1332 106f TIO 80 fe KUT Koz? 

1332 CO 87 137B 1065 B ERG EPAWCH IF CENN RCO eR 
1336 E3C9DS40F7 1066 DC Cla’ tio 7 

1067 

1068 * ISVALID STO WN CODERS. 
133B OF 07 0003 1069 ALC 3 (2) ,NO18 IKCB RETIN AT 
1341 F3 45 00 1070 SIO Yr'oor,xytase Wow 5. 

1344 CO 87 1378 1071 8 BRIG BRANCH TP Cen 
1348 E2CIDSLOFS 1T34C 1072 CL5'SI0O 5! 

1073 
134D OF 01 0003 1074 3{2) ,NO18 
1353 F3 46 00 1076 X*OO' Xess | 
1356 CO 87 1378 1076 ARANCH TPF CHRD 
1352 B2C9OD64O0FE6 1O77 

1073 
135F OF 01 0003 1079 (2) 8018 INCH RETUPE aAnDeRas. 
1365 F3 4&7 00 10806 i = 
1368 CO 87 1378 1081 ER 1g RANCH TF 
156C E2C9D64G0FT 1082 Do 

1083 
1371 OC Q3 0003 1OR8& PUTBAK MVC 3 (4) R RESTORE BOTTOM coer OF 
1377 CO 87 0216 1085 8 LIKE RETORN TO DCP. 

1086 . 

1O87 * ROUTINE 16 

TOES 

TOB9 ERG A 

1090 ST rO,ARR 

109% Vc LWNG (5) ,8-* STORE PaRILT} 

1992 BVC ) ,PLENS S Op F 7 

1093 MYC 

TO9G 

1995 

1096 

TOUT ’ 

1098 AL2 (PDT; 

7099 OC ALSZYROV9" 

1100 4 YK PRT (91) ,PRT41 

T1G4 | RAPS 

1102 DC RL2'9053" 

1103 

1104 ny 4 

too PUTSAK SO 


DATE 616AUG7TR = 15NOVTY 
EC NC. 824765 824870 


i 


IBM MAINTENANCE DIAGNCSTIC PROGRAA PART NO. 5558421 
PAGE 10 


80471 3741 FUNCTION TEST WITHOUT THE WRAE CONNECTOR 


ADDR STST SOURCE STATEMENT 


VIO FT ERK AEESEEKEEE HEE EERE RSE EEEEKEEEAEEREREKERREREEEEREKAHEEEEERES 
1108 * SNSERR * 
1109 sve eeeenee 
1110 

9717 

1112 

1113 B 
1114 DC 
7115 DC 
1716 DC 
1117 * 

TEL R BREESE HK EEE EKER REEREEERKEEEKEKKKARESEREKAEKERAAEKERERERAEEEKKEKREE EEKKEKSE 
4119 SNSERR A N001,ARR 
1120 3T *+9,,ARR 

1421 MVC 8 80o1XPT(2) ,*-* 
1122 NGO2,ARR 
1123 *+9, AHR 

1124 ACT (2) »#~* 
1125 N0O1, ARR 
1126 *#9,ARRB 

1127 SNRID (1) ,t~# 
1124 NO01,ARR 
1129 ERSN+3,ARR 
1430 
1131 
1132 
1133 
1134 
1135 
1136 
GA03 1137 
oc 1138 
1FO4 1AAE 1139 
171B 1ABF 1140 PRT-46 (16) ,STLCR-5 
OA03 1144 RTN#,X'04! 

05 1742 : #49 

1P12 1AD6 11463 PRT-55 (18) ,LOTRL 
QA03 RTN#,X*05! 

06 | ss #49 

1F06, 1BCA PRT-67(15) ,DIAG 
1A? EPRNT2 


SUBROUTINE PRINTS SEWSE ERROR HEADING 
AND DOMPS STATUS/ERRORS OF THE REGISTPRS. 
CALL SUBROUTINE BY ~ 


x 

* 

bs 

* 

SNSERR * 

2,X°EXPECTED PATTERK! * 

2,X*ACTUAL PATTERN! * 

1,X "ERROR ID* * 
* 
* 

18D0 

13C8 

4¥63C 0000 

18N2 

13 D6 

163E O00G 

18D0 

13 RH 

13F6 0000 

18D0 

TG4B7 


§ 
: 
@ 
¢ 
f 
| 
i 
‘ 
F 


STORE EXPECTED PATTERN. 


STORE ACTUAL PATTERN. 


STORE ERROR ID. 
STORE RETURN ADDRESS. 


PRINT ERROR HEADING, 
ID ~&4003~- OR -2904- OR ~4005-. 


PRINT 
XL1*C2? 
IL1*12* 

AL2 (SNCKMS) 
XL2*4000" 


O2Z1A 


p 
| Perr LOC OBJECT CODE 


FROM RTNO3 ERROR ? 
JOHP IPF NOT. 
LOAD RTNHO3 ERROR HEADING. 


RTN#,X*°O3' 
*E 5 
PRT-69 (71) ,STLCR-22 


RON RTUOG ERROR ? 

JUAP I? NOT. 

LOAD RTNOW ERROR HEADING. 
FROM RYTNOS YRROR ? 

JUMP IF NOT. 

LOAD RTNOS ERROR HEADING. 
PRINT HEADING. 


INITIALZTZE OUTPUT ADDRESSES. 
FROM ROCTINE 05 ? 

CUMP IF NOT SO. 

SET JP DUMMY EB) FIELD. 


1 P06 PRI-67,X¥R2 

0A03 RTW#, ¥°C5?* 

07 ' NORA 

190D ae WORK, XBR1 

O& q x47 
PRT-4&7,XR1 S2T UP NORMAL EB? FIELD. 

PRT-~70(10) , EB? ARRANGE TABLE PEADINGS. 

RTIN#,K'O5! FROM ROUTINE 05 ? 

*49 SKIP IF SO. 

PRT-50 (10) ,ZB1 

FPRNT 


PRINT EB BYTE LABLES. 


PRT-67 (15) ,BITS ARRANGE BIT LABLES. 
RTN#, X05! FROM ROUTINE 05 ? 
#49 SKIP IF SO. 
PRT-47 (15) ,BITS 


EPRNT2 PRINT BIT LABLES. 


BITSHF CALCUY.ATE STATUS OF ALL ACTUAL BITS. | 


AL2 (ACT) 


YEAUG? 
B24 765 


¥ TS NOVTE 
624876 


EPRET 

CMPARE 
PRT~84(7) ,ERORS 
PPRNT2 

ko 


GO PRINT ACTUAL STATOS. 
FIGURE CRROR BITS. 

MOVE YN ERROR LABLE. 
PRINT ERROR BITS. 
RETOURW TO ROUTINE. 


PROG ID 
PAGE 


Aye vil 


i IBM MAINTENANCE DIAGNOSTIC PROGRAM : PART NO. 555842 
= PAGE 


4O11 3761 PUNCTION TEST WITHOUT THE WRAP CONNECTOR 


“/ BRR LOC OBJECT CODE ADDR SMT SOURCE STATEMENT 


4176 
1177 * LIOSNS # 

1178 &eeeeeeene THE EXPECTED AND ACTUAL SNS PATTERNS 
1179 ® ARE COMPARED FROM ROUTINES 07-08. 
1180 * 

1181 

1182 WO01, ARR 

1183 *+9,ARR 

1184 NID (2) ,*-* SAVE THE N CODE, ERROR ID. 
| 1785 N001,ARR 

* x | 1186 CKKLS+3,ARR SAVE RETURN ADDRESS. 

* 1187 

11988 LSCK (2), PATRN EXPECTE® AND ACTUAL EQUAL ? 
1189 +7 JUMP IF NOT. 

1190 Bene te RETURN TO ROUTINE. 

1191 

1192 | LSID (1) ,NID-1 STORE CORRENT ERROR ID. 
1193 PRINT PRINT ERROR HEADING. 

1194 XL1°C2" 

4195 YL1*229 

1196 AL2 (LSCKR) 

1197 co ~ X¥£L2'40008 

1198 NID, X'F1" N CODE 1 CHECK ? 

1199 y *49 JUMP IF NOT. 

1200 PRT-55(17) , FNCT MOVE IN N 1 ID. 

1201 NID,X'F2?* W CODE 2 CHECK ? 

1202 *49 JUMP IF NOT. 

1203 PRT-66 (16) ,STLCR-5 MOVE IN N 2 ID. 

1204 NID, X¢ Fu? N CODE 4& ID ? 

4205 *49 | JUMP IF WOT. 

1296 PRT-54 (21) ,DADR MOVE IN NR 4 ID. 

1207 NID,X? FS? N CODE 5S CHECK ? 

1208 : *49 JUMP IF NOT, 

1209 PRT-66 (17) ,DIGTR-5 MOVE IN N 5 ID. 

1210 EPRNT2 PRINT HEADING. 

1211 NID,X'*F2! N CODE 2 CHECK ? 

1212 SPL2 JUMP IP SO. 

1213 NID, X*PS? N CODE 5 CHECK ? 

42174 SPL2 JONP IF SO. 

1215 : PRT-70(10) ,EB2 SET UP BYTE LABLES. 

1216 PRT-50 (10) , EB1 

1217 EPRNT1 PREWT BYTE LABLES. 

1218 m PRT-67 (15) ,BLTS SET UP BIT LABLES. 

1219 : PRT-47(15) , BITS 

1220 EPRNT2 PRINT BIT LABLES. 

1221 PRT~67, XR2 LOAD OUTPUT ADDRESS. 

1222 PRT-47,XR1 

1223 CALC 

1224 % PRT~70(10) , BB 

1225 EPRNT1 PRINT EB1 HBADING. 

1226 PRT~67(15) ,BITS 

1227 EPRNT2 PRINT BIT HEADINGS. 

1228 PRT~67,XR1 STORE OUTPUT ADDRESSES. 
1229 WORK, XR2 

1230 BIVSNP CALCULATE BIT STATUS OF BYTES. 
14241 AL2 (LSCR) 

1232 3 EPRNT 1 PRINT BIT STATUS. 

1233 c XP? (2),PATRN STORE EXPECTED PATTERN. 
1234 > act (2),LSCK STORE ACTUAL PATTERN. 

1235 CHPARE CALCULATE ERROR BITS. 

1236 7 - PRT-84 (7) , ERORS MOVE ERROR LABLE IN. 

1237 EPRNT2 PRINT ERROR BITS. 

1238 

1239 ¥ CKKLS#3 (2) , NOON INCR RETURN ADDRESS TO BRANCH 
1240 CRKL TO ERROR HALT IN ROUTINE. 


&#eneketzt & 


“PATE 1GAUGTS 1S ROVTY PROG ID 
EC NO. 828765 A24RTO PAGE 


IBM BAINTERSAWNCE DIAGRHOSTIC PROGRAM PART WC, 555842 
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R217 3741 PONCTION TEST WITHOUT THE WRAP COBHECTOR 


Ye pe LIC OBJECT CODE ADDR STHT SOURCE STAT EMEWT 


} FZUD Kee SHSHREKSEESESSEESKEPESESEKSRSESSKRSESHTEKERSHKRSECEAKAESSEKSESESHHKESHRERKREKEKEHE SEY 


’ 
p 
B 
a 
é 
g 
a 
Y 
q 
, 
a 
a 
8 
| 
{ 


FSROVIG 
B24E79 


1243 * SIORN * 
{244 enon eee 


1245 * 
1246 * 


TEST READINGS AND ERROR RESSAGES 
ARE PRIWTZD POR ROUTINES OD - 13. 


L247 SSS KEES ETS HEARSE SEA SESHSKKSE SSESSSESSESEKSSESKSHKKEKRSEKESAEKSAHTKSE SEES EKKSEEEREE S 


1248 SYORD 
1249 

1250 

1251 

1252 

1253 

1254 

1255 

12564 

1257 

1258 

1259 

1260 

1261 SID 
1262 

1263 SHDD 
1264 


1265 * ROUTEWE OD-13 ERROR MESSAGE * 


1266 
1267 CKSIO 
1268 
1269 
1270 
1271 
1272 
1273 
$274 
4275 
1276 
1277 
12738 
12793 
1280 
1281 
1282 
1283 
1284 
1285 
4286 
12387 
1288 
1289 
1299 
1291 
1292 
1293 
1294 
1295 
1296 
1297 
1298 
1299 
4390 
1301 
1362 
1393 
1304 CKS 


ST 
AVC 
A 
St 
AVC 
A 
ST 


NVC 


B 


ST 
BYC 
A 
ST 


JE 


ayc 
B 


MYC 
RVC 
8 
AY 
a¥C 
B 


ALC 
5 


*4+9 ,ARR 

SID(1) ,*-* 
WO29, ARR 
*4+9,ARR 
PRT-46 (29) ,#~-* 
NOO1, ASB 
SHDD+3, ABR 


PRT~75 (16) ,TSIO 
PRINT 

XL1¢a5? 

TL1¢91 

AL2 (PRT) 
XL2*40008 

PRT (91) ,PRT#1 
~~ % 


#49 ,ARR 
SERID(1) ,*-* 
WO01,ABR 

CKS +3, ARR 


XPCT(1),DTB-1 
CKS 


PRINT 
XL1¢C2* 
IL1‘'22' 

AL 2 (STOCK) 
XL2'80C55 


PRT(31) ,PET#1 
PRT-67 (15) ,DIRG 
EPRET2 
PRT~79 (10) , EB2 
EPRNT 1 
PRI~67(15) ,BITS 
EPRNT2 


PRT~67,XR2 
PRT~47,XR 14 

BITSNP 

AL2 (DPR) 
PRT-~47 (15) ,PRT-46 
EPPRRT? 


XPT-1(1) ,XPCT 
ACT (2) , DTE 

CMPARE 
PRT-84 (7), ERORS 
PRT-47(15) ,PRT-46 
EPRNT2 


CKS#3(2),NO08 
x. 


STORE MESSAGE HEADING IP. 


STORE ROUTINE HEADING. 
STORE RETURN ADDRESS. 


BUILD UP REST OF HEADING. 
PRINT ROUTINE TEST HEADING. 


CLEAR PRINT AREA. 
RETURN TO ROUTINE. 


STORE ERROR ID. 
STORE RETURN ADDRESS. 


EXPECTED AND ACTYAL EQUAL ? 
JOMP IP SO. 


PRINT ERROR HZADING, 


MOVE IN DIAG BYTZ LABLE. 
PRINT LABLE. 

BRIWG IN FB2 LABLI. 
PRINT LAELF. 

BOVE IN BYT HEADINGS. 
PRINT HEADINGS. 


LOAD OUTPOT ADDRESSES. 
CALCULATE STATUS OF ALL BIS. 


CLEAR EBi STATOS. 
FRINT BIT STATUS OF DIAG BYTE. 


STORE EXPECTED PATTERN. 
STORE ACTUAL PATTERR. 
CALCULATE ERROR BITS. 
MOVE IW FRROR “ABLE. 


PRIWT ERROR BITS. 


INCR RETURN ADDRESS TO RETOR®N 
TO ERROR HALT. 


IBM BAINTENAWCE DLAGHOSTIC PRKOGRAS 


4911 3741 PONCTIOS TEST WITHOUT 


“ERR LOC OBJECT CODE ADDR STAT 
1306 
1307 
1308 
1309 
1310 
1311 
1312 
1313 
13148 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1326 
1329 
1320 
1331 
1332 
1333 
1334 
1335 
1336 
1337 
1338 
1339 
1340 
1341 
1342 
1343 
1344 
1345 
1346 
1347 
1348 
1349 
1350 
1351 
1352 
1353 
1354 
1355 
1356 
1357 
1358 
1359 
1360 
7361 
1362 
1363 
136% 
1365 
1366 
1367 
1368 
1369 
1370 
1371 
4372 
1373 


36 O8 18D0 
24 O8 16EBE 
Cc O01 16F4 0000 


T5NOVTS 
824870 


TSADGTA 
A248 755 


THE WRAP CONN FCTOR 


SOURCE STATESENT 


PART NQ. 
PAGE 17 


5558421 


A 


SEK HKEEKEEAEREKKEE EERE EATER AER SESERSEESASRHSES KEKE KSEEH OHKEKEEREEEEEKE S 


* CHPARE * 
ere Se ee ts 


t 
* 
* 
« 


EXPECTED EB! & 


EB2 BYTES IW *XPY* ARE 


COMPARED AGAINST ACTUAL EB & EB2 BYTES 


IN 'ACTt, 
A ~*~ 


ERROR BITS ARE YJDENTIPIED BY 
IN THE OUTPUT AREA. 


SES KKTAEESKSESEAE KEKE ERASER EKASEKESAESKKE RE EHEEKTEA SEEKER ERE SERRE SEEKS E 


XPT DC 
ACT DC 


CNPARE ST 
oT 
st 
AVI 
NYI 
SVT 
MYT 
NVI 


TALERR 


TBERR 


X¥L2'0000' 
XL2*00005 


CMHPR+3,ARR 

TAERR¢3,XR2 
TBERR¢3,XR1 
TA3+1,X"018 
TA2+1,X*018 
TAI+1,x°018 
TB341,X"01! 
TB2¢1,X"018 
TB141,X701! 


XPT-1, x01! 
TAI 
ACT-1,X'018 
TAERR 

TB3 


ACT-1, X*01 . 
TAERR 


XPT, x*'O?! 
TB1 

ACT, xX*O1 
TSER™ 

2 Os 


ACT; 27°00" 
TRERR 


TR1+1,X'80" 

*k~& 
TA1+1(1),TAI1E1 
TA241(1),TA2+1 
TA3+1(1) ,TA3+1 
TBR141/1) ,TBI+1 
TB241(1) ,TB2+1 
T83+1/1) ,TB3+1 
TAEER+2 (2) ,N002 
TBERR+t 3(2) ,NOO2 
TA3 


#—* ,X'5C! 
TB3 
Kae YIST! 
rc 


EXPECTED E£BI & EBB2 BYTES. 
ACTUAL EB1 & EB2 BYTES. 


STORE RETUBN ADDRESS. 
INITIALIZE OUTPUT ADDRESSES. 


INITKLALIZE BIT POINTERS. 


EXPECTED BIT ON IN EB2 BYTE ? 
JUMP IF YES. 

ACTUAL BIT ON IN EB2 BYTE ? 
GO PUT AN ~*- IN OUTPUT IF OR. 
CHECK FB BYTE. 


ACTUAL BIT ON IN EB2 BYTE ? 
GO POT AN ~*~ IN OUTPUT IF OFP. 


EXPECTED BIT ON IN EB BYTE ? 
JUAP ITP Sc. 

ACTUAL BIT OW IN EBT BYTE ? 
GO PUT AN ~*~ IN OUTPUT IF SO. 
CONTINUE ANALYSIS. 


ACTUAL BIT ON IN EBT BYTE ? 
GO PUT AN ~*~ IN GUIPUT IF OFF. 


RIT 0 BEEN TESTED ? 
RETURN IF SO. 
INCREMENT BIT POINTERS. 


DECREMENT OUTPUT ADDRESSES. 
GO CHECK NEW BIT. 


PUT -*- IN EB2 OUTPOT. 
CONTINUE CRECK. 
PUT ~*~ IN EBT OUTPUT. 
CONTINUE CHECK. 


FEES SEK KKK SE AEE AAKSHEAAEKEAREKKEEEKEKSKKEE ERE SEEKER ES A BREEREKEE KRESS SEKEESE SE 


* BITSHF * 


EXER EK & 
*« 
= 


THE FBY & EBB2 BYTES ARE CONVERTED 
TO A PRINTABLE BINARY FORK. 


* 
* 
* 
*: 
i 
re 


ERESKKKEK SKA EKEKESHKSEKEKSERAKHKSER SEEKER EKKEKHESAE ESKER KECEKHA HERE ERE SEE 


EB2T Dec 
EBIT DC 


BITSNF A 
ST 


AC 


XLi'oo? 
XL1'OO' 


WOO1,ARR 
*4+9, ARR 
e711 (2) ,%-* 


TEMPORABY STORAGE POR FBZ & EBT 
BYTES. 


; 
r 
2 


— 
q 
a 
g 


IBA MAINTENAWCE DIAGNOSTIC PROGRANS 


G011 


ERR LOC OBJECT CODE ADDR STEHT 
13748 
1375 
1376 
1377 
1378 
1379 
4380 
1381 
1382 
1383 
1384 
1385 
1386 
1387 
1388 
1389 
4390 
1397 
1392 
1393 
1394 
1395 
1395 
1397 
1398 
1399 
1490 
1401 
1402 
1403 
1408 
1405 
1406 
1407 
1408 
7409 
1410 
1411 
T4912 
1413 
Ta14 
1815 
T4H16 
1417 
1418 
7419 
1420 
1424 
1422 
1423 
1424 
TAa25 
1426 
1u27 
TQZes 
14829 
1439 
1431 
4432 
1433 
V8 
1835 
1436 
4837 
1538 
O39 
TREO 
744" 


16E9 90000 
18D0 
1740 
I7OE 


16EF 
16F5 | 
16F9 | 
16FD 
17014 
1705 
1799 


179D 
1771 
1778 
1718 & 
W715 . 
T71F . 


1723 
1727 
T72ZA 
I72E 
3731 
1735 


1739 
173D - 
1741 
1747 
17&8D 
1753 
1759 


3747 FUNCTION TEST WITHOUT THE WRAP CONNECTOR 


SOURCE STATEMERT 


MYC 


EBIT (2) ,#=-" 
NOO1, ARR 
ATNF+3,ARR 
THR+1,X'0O1? 
TMPF+1,X4018 
NF+3,XR2 

SEP +3, XRI 


EB2T,x*O00* 
IrSON 
NP¢?,X'PFO® 
NF 

MFT X'P1t 
*<-*  X* 00" 


EBIT,X*0O! 
ITON 
NPF+T, X' FOS 
NFP 
NPP*i,X'FT* 
¥~*,X°005 


TNR+1,X'60! 
. oe 

THP4+1(1) ,TNP+1 
TNFP+!(1),TNFF#1 
NP+#3(2) ,NO02 

NPP +3 (2) ,NOO2 
TNF 


PART WO. 5558421 
PAGE 12 


STORE EBT & EB2 BYTES. 


STORE RETORN ADDRESS. 
INITIALIZE BIT POINTERS. 


INITIALIZE OUTPUT ADDRESSES. 


THIS BIT OW IN BB2 ? 
JUMP IF SO. 
MOYE IW A O. 


MOVE If A 1. 
PUT 1/0 IN OUTPUT. 


THIS BIT ON IW EB! ? 
JUMP IF SO. 
MOVE IN A O. 


A 1. 
IW OUTPUT. 


MOVE If 
POUT 1/0 


CHECKED BIT 0 ? 

RETORW IPF SO. 
INCREMENT BIT POINTER. 
DECREMENT OUTPUT ADRS. 


CONTINUE CHECK. 


KEEKSKKESHKSEKSEEKESES SKEEHKSESRESEHKERKSEKESESEESSSHSESSEAREKKS RRA STEEKEKRESCKEKEEKKRES 


* QUES * 
HEKREEEE 
x 


SUBROUTINE 


DETERMIWES IF £SW 10 IS ON. 


ESSE SKEKSEEKEKAKSSAREROKSESE KEKE KES KEKSKSESSESESESSESSERE SA ESKER EEA KERSEKAEK EEE 


QUES ST 
TBR 
JT 


9S5¢3,ARR 
SBYTE2,.S5S¥10 
OST 

OS #3 (2),N003 
Ean & 


x'0200', x'c2? 
Qs 

QOS +3,XR1 
2(2,XR1) ,BFPFS 
Os 


STORE RETURN ADDRESS. 

SSW 19 OR ? 

RETURN TO PRGH HALT IF SO. 
INCR RETURN TO SKIP HALT. 
RETORN TO ROUTINE. 


YS THIS A HODEL 'B* SYSTER ? 
GO DO WORMAL HALT IF WOT. 


SET UP SODEL B HALT. 
NOW GO HALT. 


EHREKEREEKKKATCRAERKEKKEKEKEKS SKE TEKTERKAR ERASER REE EKER REKERE 


* TIOERX * 
REE KEKE KEK 
& 


SUBROUTINE PRINTS TIO ERROR NESSAGES. 


SHRERKKKKK ERE RK ESESE SESE EKER CARTE KKEAAUK KERR EECA REARS EAEEAKEKES 


TIOERD 8 
DC 
DC 
DC 
DC 
AVS 


PRINT 
XLT*c2¢" 

IL 148 

AL2 (RDY) 
XL2*4yOO1? 
PRT-50 (01) ,CNCTR 
EPRNT1 
PRT-45 (37) ,RNOV 
EPRNT2 
PRT~66 (25) , IFOPF 
RPRNTI 


MAPS 
X£L2*87021 
RAL? 
XL2'*uUOGi* 


PRINT 3741 I5 READY ERROR MESSAGE. 


IS CONHECTOR OW ? 

OPERATOR "0 RENCYE IT IF SO. 
OTHERWISE. 

TO NAP CHART. 


870, ENTRY 2. 


PROG ID 
PAGE 


oe 


IBM MAINTENANCE DIAGNOSTIC PROGRAM 


8011 
Jere Loc 
47BB 


17BF 
17C3 
1704 
17¢c5 
V7C7 
17C9 
17CD 
17CP 
17D3 
17D5 


3741 FUNCTION TEST WITHOUT 
OBJECT CODE 


1442 
TRYY 
CO 87 O21K THK 
C2 1485 
OD $ 1446 
1CAO 1447 
4002 1448 
co 87 1449 
B721 1450 
CO 87 1854 
8002 452 
CO 387 1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
“864 
4962 
1463 
1468 
1465 
1466 
1467 
{468 
1469 
14370 
1471 
R72 
1473 
1474 
VuUT5 
1476 
1477 
1478 
1479 
1480 
1481 
1482 
1483 
1488 
+4a5 
1486 
1487 
4a88 
TURY 
1490 
1494 
1492 
1493 
1494 
1495 
1496 
1497 
7498 
1499 
1500 
504 
1502 
1503 
+504 
1505 
1506 
1507 
1508 
$509 


cO 87 OA11 


1855 

1860 

1862 
TDAG 


TSwNOV TSE 
824370 


THE WRAP CONNECTOR 


B 


TIOERB B 
Dc 
DC 
dC 
DC 
8B 
DC 
B 
DC 
B 


ADDR STMT SOURCE STAT EMENT 


BEGINN 


PRINT 
XL1'c2¢ 
IL1*13° 
AL2 (BUSSY) 
XL2'40028 
MAPS 
XL2°8721' 
HALT 

¥L2 "40025 
LINK 


PART NO. 555 €421 
PAGE 124A 


TELL TO DO SYSTEM RESET, START. 


PRINT 3741 IS BUSY FRROR MESSAGE. 


POINT TO MAP CHART. 
-~PAGE 872, ENTRY 1. 
FRROR HALT ~0O2-. 


RETURN TO DCP. 


SHREK EKR KEKE KEKSSSESCKEKEEKEEESE KEE HEE SEEARKEKEREREKRERERKERAEEKES EK EKEERE 


* MAPS * 
ERS ERE RH 


SRRSEKKKKKSEKRKEAKESETEREKEKKEKESE MEK SEEKERS CESSES EKEEKE KEKE SEEK EKERE REESE 


MaPS st 
L 
ANZ 
BNW 
BENZ 
AWN 


TRE SAP CRART REFERENCE IS PRINTED. 
SUBROUTINE BY - 


B 
DC 


TEMP,ARR 
TEMP, XR1 
MAPSS~11,0(,X81) 
MAPSS~10,0 (,XR1) 
MAPSS~9, 7(,XR1} 
MAPSS~1,1(,XR1) 


PRINT 
XL1'36? 
IL1*3a! 
AL2 (MAPSS) 


2(,XR1) 


MAPS 
XL2"*PAGE NOUMBER/ENTRY NOUMBER! 


CALL 


* 
* 
he 
x 
* 
* 
e 
* 


STORE THE ARR. 

LOAD ARR INTO XR1. 
STORE HUNDREDS DIGIT. 
STCRE TENS DIGIT. 
STORER UNITS DIGIT. 
STORE ENTRY NUMBER. 


PRINT- GO TO MAP CHART XX. 


RETURN TO ROUTINE, 


ERE ERESEAAEAD ERAS ERECKEKESE EE AERERRE EAE ERRATA EE EER EKARER EER ERS 


* CODE * 
EREKKEEEK 
* 


TEST HEADINGS ARE PRINTED POR &BTNOT-OF. 


SEEK EKEKSES KKARETARREKESE SAKES KEARSE REKAKAAEKSEEKRSEKEKKE KSEE SEEKERS E RT EKER ED 


CODE ST 

cop MYC 
A 
ST 


CLI 
BNE 
aYC 
BVT 


COD+5, ARR 
THD-1(1) ,*-* 
NOO1, ARB 
CODD+3,ARR 


THD-1,X!F1* 

*x+14 
PRIT~34 (17) ,FNCT 
PRT-33,X72B! 
THD-1,X'F2* 

*+78 

PRT-30(21) ,STLCR 
PRT-29,xX'4Bt 
THD-1,X'F3' 

*e14 
PRT-33 (18) ,ITOTRL 
PRT-32,X'4B! 
TAD-1,X'FS'* 

e+ 74 
PRT-~29 (22) ,DIGTR 
PRT-28,X'4R! 


ONPACK 
ILit2¢ 

AL2 (PATES) 
AL2(TSPAT-63 
PRT~51(40} ,TSPAT 


STOKP NWN CODE IN. 
STORE RETORN ADDRESS. 


N CODE 1? 
BRANCH IP NOT. 
LOAD NW CCDE 1 MEANING. 


N CODE 2? 
BRANCH IP NOT. 
BRING IN WN CODR 2 MEANING. 


N CODE 3? 

BRANCH IF NOT. 

BRING IN N CODE 3 HEANING. 
H CODE 5? 


BRANCH IF NOT. 
RRING IN WN CODE 5 MEANISG. 


ONPACK CURRENT TEST PATTERN. 


BRING REST OF HEADING. 


PROG ID 
PAGE 


IBM MAINTENAWCE DIAGNOSTIC PROGRAS PART FO. 5558421 
i PAGE 13 


49171 3741 FUNCTION TEST WITHOUT THE WRAP COMRECTOR 


Dena LIC OBJECT CODE ADDR ST&T SOURCE STATEMENT 


1869 1D9C 1510 CLC TSPAT-8(2) ,COO LCR OR DTR TEST ? 
186F F201 12 1511 INE GORD JUMP IF NOT. 
1872 OC 1DA8 1512 AVC SHORT-2(2) , TSPAT-6 MOVE IN SPECIAL PATTERN. 
1878 OC 05 1F11 1512 PRT~56 (6) , SHORT 
1516 
187B 3 188D 1515 uN HDNGID, RINE MOVE IX ROUTINE ID HEADING. 
1884 O21A 1516 PRINT PRINT HEADINGS FOR RTM 05 ~ OC. 
1888 4 1517 XL7445? 
1889 5B : 1518 IL191¢ 
188A 1P4 1519 AL2 (PRT) 
188C HOA 1520 HDNGID pC XL2"aOa0' 
18BE 1521 PRT (91) ,PRT+1 CLEAR PRINT AREA. 
1894 C1 4 1522 IO DROPD,x* 42? BRANCH IF 3741 IS BUSY. 
1898 CO 1§23 CODD B *— RETURN TO MAIN ROUTINE. 
1524 | 
FH2PH SHEESH EKKKSK ESE KSKEERESKSEASESREK SKE KSHSEAEESESS SCSHEKSSHSHE ASSES IC KEKE SKE KGE SD 
1526 * EPRNTX * * 
1527 ¢eeeeaeaee DCP FRRCR PRINTING SUBROUTINES. 
15928 * « 
F929 SEKAKESHAESEAEEESC SEA SEREESATA REL EERSTE SHSSHK SSS ESRC EKTEKAHREEKR TERESA SE 
1530 EPRET! ST PRTT+3,ARR STORE RETURN ADDRESS. 
1531 BVI. LINE,X*81! SET TO SPACE 1 LINE. 
1532 PRNT GO PRINT. 
1533 EBPRNT2 St PRIT+3,ARR STORE RETURN ADDRESS. 


) 

8 

2 

B 

B 

Md 

5 

] P2 8° 
8 3c 82 1534 I LINE,X*82* SET TO SPACE 2 LINES. 
| 

8 

q 

a 

| 

é 


1535 
1536 PRET PRINT PRINT THE DATA STORED IW ~-FPRT-. 
1537 LINE D XLdtgont DO CORRESPONDING SPACE QPENATIORN. 
1538 IL1T*9T? 
1539 AL2 (PRT) 
1540 a: PRE (91) , PRT) CLEAR PRINT AREA. 
1541 PRET ¥~% RETURE TO ROUTINE. 
1542 
J5RQ SEK AEKE ARE SKE ES EEK ASTRKEKSS HASSE AEE SER EKSSH ERE RETEST EAEKHE EER EKEE 
1544 © INTE * 
1545 see e808 BRANCH HERE IF INTERRUPT IS FRROMFOUSLY 
1546 * CAUSED IN ROUTINE OF. 
1547 * 
TS4Q CHARA AKA AS EERE SESE KEE RE EKER SERA SASK AER EH EAR REN EET AERREREE 
1549 FIAG pc XYLi'OO* 
1550 xrNTS SBN PLAG,X'OT® TURN ON ERROR FLAG. 
1357 STO rropr,xragr RESET THE IWTERROUPT. 
1552 B I8TS 
1553 
4550 Sek eee REE EERSTE RED 
1555 * CONSTANTS ce 
1556 FERC EKER ERETHE REE ETE EEE EARRERSE EAE SEER HAE KATE AOEES EKER EETE 
1557 NOoO0 DC YL2'O* 
1558 NOO1 yc IL2* 1* 
1569 R002 BC TLZ!2¢ 
1560 NWOT % dc TL2* 3$t 
1561 WOOu pc IL2*a! 
; 562 nOw® pc IL2* 18' 
1563 W019 IL2Z2*19* 
1964 RO29 IL2*29' 
4565 80080 X1.2'O0O080! 
1566 HAAS5 XL2* AA5S! 
1567 HSSAA 0D XL2°*SSAA?* 
568 H1000 = j XL2*' 1000: 
1569 80955 RL2*GG5S 5 
7570 HOPS5 : XL 2*OFS5# 
1971 HOORA XL2'°'OGAA' 
1S72 RAAAA XL2°AAAAS 
1573 asP7 XL2'FPRFF 
1574 HPFFS pC YLé° PFFS* 
1575 HPFSS - ! XL2°FPSS'* 
1576 XL2'*cos7t 
1577 BRANCH { AL2 (RT RN) 


PROG ID 
PAGE 


IBM MAINTENANCE DIAGNOSTIC PROGRAB PART NO. 5558421 
rT. PAGE 13A. 


4O11 3744 FUNCTION TEST WITHOUT THE WRAP CONRECTOR 


ERR LOC OBJECT CODE ADDR STST SOURCE STATEMENT 


18F7 FOFO 18F8 1578 C00 ot CL2*00* 
1B8F9 18C2 18FA 1579 INT RS AL2(INTS) INTERROPT ROUTINE ADDRESS. 
1580 
1581 ERROR EEK HEE EERE 
1582 * RESERVED ARPAS * 
1583 EERESERERERES EEE AE EERE RE EEE ETE E TERRES EH EERE REREREREE RRR ERE EEE EE: 
0000 18PC 158% DtTR DC XL2'°0000! STORAGE ARFA POR DATA TRANSFER RF. 
6000 I8PE 1585 TEMP DC XL2'OO* 1-2 WORD WORKING AREA, 
0000000000000000 190D 1586 woRK SXL1T'9or WORK AREA, 
00000000000000 1586 
0000000000000000 1915 1587 LS i B8XL1'00! LIO/SSHS STORAGE APEA. 
1917 1588 LSCK D: XL2'*0000* ACTUAL SENSED DATA STORAGE ARER. 
1919 1589 PATRNW pe XL2*00008% CURRENT TEST PATTERN STORAGE ARPA. 
191A 1590 XL7*'00! CORRENT FEREOR ID. 
191B 1591 WID DC XLi'OG! CORRENT N CODE, 
194C 1592 xpcT DC XL1°O08 EXPECTED DIAGNOSTIC BYTE. 
1593 
1594 Bee eaen a 
1595 * PFLAG * 
4596 RREEERE MERE REE EERE AEE REESE EERE EREREE RE ERER ERA ARSE REE RRR KEENE S 
1597 EBFPLAG DC XL1°*965° FEB CYCLE FAILURE PLAG. 
1598 * BIT ¢ ® CODE EB BYTE # 
1599 ® | 
1600 * 
1601 * 
1602 * 
1603 * 
* 
* 
* 
* 


AN ACTIVE BIT MEANS 
A POSSIBLE EB CYCLE 
PATLURE. 


1604 
1605 
1606 
1607 
1698 
1609 
1610 *ERSReeeee EEE EER ERE & 
1611 ® MESSAGES * 
1612 FER EEL ERE EERE AES SERED EKER EEE EEE OEE AEE ERRER EKER EERE EREKEKEREE ED 
DIC5D4 DE E5SC54 OE 1613 RSIOC oC CLUS'RESOVE WRAP CONNECTOR NOTE - CPU MAY DROP PoWwFR.? 
DIC ID74OC3D6DSDS 1613 
CSCIEIDHDG4OHODS *613 
D6E3C5406040C3D7 1613 
Z4UODUCTEBYOCEDS 1613 
D6DIGODTDEF6CS5D9 1613 
4B 1613 
CICEYOR2D66B4OR3 1614 D: CLUS'IF SO, TURN POWER BACK ON AND RELOAD PROGRA™,? 
E4D9D5S80D7D6EE6CS 1614 
D9BOC2ZC1C3ID24U ODE 1614 
DS4OCIDSC44ODICS 1614 
D3D6CICRUODTD IDE 1614 
C7D9CIDS4B 1616 
C6EYDSCIEICIDEDS 1615 PNCT : CLI7'PUNCTION REGISTEH® 
4 OD 9C5C7C9EZE3CS 1615 
D9 1615 
1616 *~ 4 
DICSDADGESC54 OFZ 1617 CL39*REFOVE 3781 Y/O CABLE. ALSO REEOVE THE! 
P7F4F140C961D640 1617 
C3C1C2D3C54R4040 1617 
CIDJEZDSLODICSDY 1617 
DOESCSSSESCRCS 1677 
GOE6DOCIDINOC BS 1618 ! CLUO' WRAP CONNECTOR. THEN PERFORA A 
DSDSC5CIEIDEDIGB 1618 
YORSCBECSDS4ODIC5 1618 
DOCEDEDIDSEGCINO 1618 
B2EBSE2E3C5544 040 1618 
FOUORONDLOUOROLO 1619 
 4080504040408040 1619 
SOGOU OKOSOADANED 1619 
4OSOSOKOUDKONOND 1619 
 AOUOKOUONOSONORD 1619 


tn €> 8) AD 2 


fi 


BE EEE SEERA RE EE EER ESEREE EER EERE REE EERE CE EERE ERE AKERRE TERRE ERE ES 


* 
* 
* 
~ 
7 
* | 
i 
* 
* 
* 
x 


poe ea ae 


16AUGTS 15NOV 78 PROG ID 
B24 765 B2uR70 PGE 
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4941 3741 FONCTION TEST WiTHOUT THE WRAP CONHECTOR 


. 


ERR LIC OBJECT CODE ADDR STAT SOURCE STAT EMENT 


1403 1620 BSG2B EQU *-1 

1A04 DOICSEZCSEZ4GOCIDS 1A2B 1621 Dc CLUO"RESET AND START. 
TACT CHR OE2ZE3ICIDIE34B 1621 
1A°2 40408046040 404040 1621 
1A1C 4040404040404040 1621 
1A24 40404040 40404040 1621 
JAZC 4 OUCHO4OKONONCED 1622 
1A34 90404080404048080 1622 
.AZC 8040404080904 040 1622 
1AG4 8090408040404040 1622 
1A4C 4090404080408040 1622 

1623 

1624 4 
1A54 CUCTEICINOCIC4CY 1625 CLUO"DATA ADDRESS REGISTER FAILURE. 
1A5C DICSEZE2NODSC5C7 1625 
1A64 CIEZEB3ICSDI4OCECI 1625 
1A6C COD3E4D9IC5S4BG040 1625 
1A79% 4040404040404040 1625 
TA7TC GOROLOUDKOHOKOUO © 1626 
1A8% 4O40UORG4O404K04D 1626 
1A8C 4ON0GON040404040 1626 
1A94 4OLO4OKO4G04U0KONO 1626 
1A9C 4040404040404049 1626 

1627 
1AA4 EZE3CTEJEVEZSOC2 1628 | CL33'STATUS BYTE-LENGTH COUNT REGISTER! 
AAC EB8E3C560 D3C5D5C7 1628 
1A3B4 B3CB8L0C3D6 EUDSE3 1628 
1ABC SOD9ICSCTIC9IE2ZE ICS 1628 
1Al4 D9 1628 
1AD5 C96 1D649E3D9C 1D5 1629 CL1I8°I/O TRANSFER LINES! 
TALDD EB2CECSDINCD3CIDS 1629 
TADS CSE2 1629 
1AD7 CUCTEICIBOCICUCR 1630 iC CL21©DATA ADDRESS REGISTER? 
JADP DICSEZE240D9ICS5CT7 1630 
1AET C9EB2ZE3C5D9 1630 
TAEC CHCICICTDS DEER 3 163% . CL38"*DIAGNOSTIC BYTE-DATA TRANSFER REGISTER! 
VAF4 C9C340C2 EBE3C560 1631 
1AFC CUCTE3C140E3D9C1 1631 
1804 D5E2C6C5D9R0DICS 1631 
1BOC C?C9E2E3C5D9 1631 
1812 CSC24OC3ERCIDICS 1632 BIGGEB CL2""EB CYCLE ANALYSIS CHECK.' 
1BIA 4OC1DSCID3IEBE2C9 1632 
1B22 E240C3C8C5C3ID24B 1632 
1B2A SCSCCSC2E740C IES 1633 EBX CL29***ERX CYCLE PAILED. § CODE X.? 
1832 C3D3C540C6C1C9D3 1633 
1B3A CSC44BKOD5S40C3D6 1633 
1B42 CHCS4OR74B 1633 
1B47 5C5CC2D6E3CB84H0C5 1634 CL34***BOTH EB CYCLES FAILED. N CODE X.' 
BGP C240C2E8C3D3C5E2 1634 
1857 4OCK6CICIDICSC44B 1624 
185P 4OD540C3D6ECUC540 1634 
1B67 E748 1634 
1869 SC5CC1D3D3480C5C2 1635 | CL23'**ALL EB CYCLES FAILED.' 
1B71 4OCIESC3D3IC5E24O 1635 
1B79 C6C1C9D3IC5C4RB 1635 
B39 5C5CC1D3D340C5C2 1636 | CL24**SALL PBX CYCLES FAILED.' 
1888 EV OC3ZE8C3 DICSE2 1636 
1890 4OCKCICID3ICSC44B 1636 
1B98 E3ICSE2EB340C4C1E3 1637 CL36"TEST DATA TRAFSFER DURING EB CYCLES.' 
TBAO C140 E3D9C IDSE2CE 1637 
BAS C5D940CU EN DICIDS 1627 
1BBO C74O0CSC2Z240C3E8C3 1637 
TBB8 DICSE2UB 1637 
TBBC CHC9ICICT DS D6 E2E3 1638 DC CLIS*UIAGNOSTIC BYTE? 
tBCG C9C3ANC2EBEICS 1638 
18CB DIC9DL61EZDSE240 1639 pc CL22*LIO/SNS COMPARE CHECK.? 
1BD3 CIDSMYDTCIDICSHO 1639 
1BDB CACPCSCID24UB 1639 


> 
i 
p 
» 
9 
, 
2 
y 
| 
é 
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y 


“A JATE 16k UG7S Le ROY? 
EC 40. 824765 E2487 


> 
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49171 3741 FUNCTION TEST WITHOUT THE WRAP CONWECTOR 


PAGE 


“BRR LIC OBJECT CODE ADDR STMT SOURCE STATEMENT 


1BE1 D3C9D640CHCICID3 COB 1640 LIORST DC CL43"LIO FAILZD TO RESET LENGTH COUNT REGISTER. ! 


1BE9 C5C44O0E3 D6NODICS 1640 
1BP1 E2C5E340D3C5D5C7 1640 
JBF9 B3C840C3ID6EESDS5E3 1640 
COT §OD9CSCTCIEZEICS 1640 
1CO9 D94 BaD 1640 
1COC C4C9C1C7DSNGE2E3 1641 
1014 C9ICZ4OCZEZEIC5SHO 1641 
1cic C3ICB8CSCID24EB 1641 
1022 EISCSE2ZEI8OCIC2C9 1642 
1C2A DICIESES4OE3SDE4NO 1642 
1€32 C7D6NOE3 DE4OF3FT 1643 
1C3A FUFTHODECIDIEZEB 1643 
1C42 4ODICICTC54OFOFO 1643 
1C4UA, FOU OCSDS EIDIEBYO 1643 
1052 FORB 1643 
1054 D3D6C1CKR61E2C505 1644 
1C5C EB2CS4OCKCTEIC 140 1644 
1C64& CICHCUDICSEZE2Z4N 1644 
1C6C DIC5SCTCIE2ZE3C 5D9 1644 
1074 4YOR6CIE3ZC84O4UN4O 1644 
w7C &RO4D 1644 
CTE 4OCZCIEI4ODICIE3 1645 
1C86 EIC5DIDSE2Z4B 1685 

1C8C C5E5C5D5 1646 
1c30 D6CECHHO 1647 
1090 P3F7F4UF1I40C9R240 1648 
1C9C CZEXEZEBUB 1648 
1CA1 P3F7TFUFIVOC9E2Z4O 1649 
1CA9 DICSCICHEBAB 1649 
1CAF ESCSEZES4OFI3FTFY 1650 
1CB7 FIVOC6DEDI4OD5SD6 1650 
1CBF E34 0C2E4 E2EB4UB 1650 
1CC6 ESCSEZEZ4OFIF7F4 1651 
CCH FILOC6D6DI4OD5D6 1651 
1CDE EIJXODICSCICHEBUB 1651 
ICDE DS4OC3DECUCSHOE? 1652 
1CE6 4B 1652 
1CE7 FOOGFIGOF240F 340 1653 
ICEFP F4&SOPS4OF64U0OF? 1653 
1c? 6 6O0CSC2FI4OC2ZES8R3 1654 
1CFE C560 1654 
4000 S0C5C2F240C2ZE8E3 1655 
1D08 5690 

IDOA SCC5D9D9DE DISC 

1Di1 BDICSCIC4GH1 E6DICY 

1D19 E2cS560C3CTEICICS 

1p21 SODSDEEI4ODIC SEZ 

1029 CSE34SR 

1D2C CIDSEICSDIDIESD7 

1034 EBE3480C5D5CIC2D3C5 

ID3C SOD9ICSE2C5E340C3 

TDA CBCSCICL4B 

1D49 D5D66006 D7 S0DiIC1 

1951 E3C3C84OCECICID3 

1D59 E240 F3 D640 E20 5E3 

1D61 4B 

1D62 D5D660D6D740D3C1 

TD6A ESCIC84OCECTCIDSZ 

1D72 EB240 F3D640D9C5E2 

ID7A C5Z34B 

ID7D D3DECIC4B1TE2CSDS 

1D85 E2C5SA0EBCIESCB4aD 

1DID KICSEZEZ4OD7C 1E3 

1D95 E3CSDIDSGOG0ETET 

1D3D EFETE6QUQ0E3CRCS4O 

TDAS 4OQ60R7E76040 DAA 

TDAB EICSEZESLOCICLZCI DDD 


‘DATE T6A UGTA 15 NOV7TS 
EC NO. 824765 824879 


CL22'* DIAGNOSTIC BYTE CHECK. '° 


CLI6'TEST ABILITY TO* 


CL34"GO TO . *41 HAPS, PAGE 000 ENTRY 0. 


CLY2"*LOAD/SSENSE DATA ADDRESS REGISTER WITH' 


CL1i4* BIT PA™TERNS. ¢ 
CL4! BY EN? 
CL4 topnt 
CL1373741 IS BUSY.! 
CL14°3741 IS READY.* 


CL23'TEST 3741 FOR NOT BUSY.’ 
CL24'TEST 3741 FOR NOT READY. ° 


CLO*N CODE X.' 

CL15*0 12345 6 78 
CLI0O*=+E8) BYTE=* 
CL10'-EB2 BYTE-' 


CL7'*® ERROR** 
CL2Z7°READ/WRITE LATCH NOT RESET.! 


CL29'ITNTFRROPT ENABLE REL YT CHECK. § 


CL25*NO-OF LATCH FAILS TO SET. ° 


CL27*WO-OP LATCH FAILS TO RESET.’ 


CIMO*LOADSSENSE WITH TEST PATTERN ~XAKXK- THE! 


CLO. It — 1+ 


CLS1'TEST sBILITY OF 3781 TO REJECT 15 INVALID COMMANDS. * | 


pase ip 
PAGE 
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“O11 3741 FUNCTION TEST WITHOUT THE WRAP CONNECTOR 


dopr LOC OBJECT CODE ADDR STHT SOURCE STATENENT 


1D83 D3ICOBIEBSODECESN 1663 
1DBB F3PF7FUFISOE3D640 1663 
IDC3 DICSDICSCIEIVOF1 1663 
DCB F540C9D5S E5C1D3C9 1663 
1UD3 C44OC3IDED4S DIC 1D5 1663 
TDDB C&E24aB 1663 
IDDE CUD64OE2E8E2E3C5 1201 1664 CLI6'DO SYSTEM RESET AND START, 16 TINES.' 
IDE6 D&4 ONICSE2ZCSE340 1664 
IDEE CiIDSCUNO EZE3C 1D9 1664 
1DPS EI6B4OFTF6E40E3CS 1664 
1DFE D&CSE248 1664 
1EO02 CSE7TD7CSC3E3480D7 1665 DC j CLUS" EXPECT PRUCESS CHECK AFTER FACH SYSTEM RESET AWD * 
1EOA DIDEC3SC5E2ZE240C3 1665 
1E12 CBCSC3ID2Z40CICEE3 1665 
TETA C5SD9IROC5SCICICB4O 1665 
1222 E2EBEZE3CSD4Y ODS 1665 
TE2A CSE2CSEZ480CID5SC4 1665 
1Z32 40 1665 
1E33 E2EICID9EI4B 1666 CLE'START. 
1E39 CODSESCID3CICK4O 1667 CL36' INVALID COMMAND WAS ACCEPTED. XXX i 
1E491 C3D6D4UD4CTDSC4E4O 1667 
1E99 BOCTE24O0CIC3C3CS 1667 
1E51 D7E3C5SC4UUBECYUOE? 1667 
1E59 EVE740D5S 1667 
TESD E2CSD5SE2C5S4OE3Ca 1668 SNTHE CLIO*SENSE THE * 
1E65 C540 1668 
TE67 E2CSD5SE2CS4OC3C8 1669 SNCKMS | CLIZ2*SENSE CHECK. ! 
1E6F C5C3ID2Z°B 1669 
1E73 SCSCDSD6E3C55C5C 1670 CNOTR CLE1***NOTE**® ITF A WRAP CONWECTOR IS ATTACHED, * 
TE7TB SOC9CO4OCTHOEGDS 1670 
1E83 CID7T4OC3HVEDSDS5C5 1670 
TESB C3B3IDED94O0CIE240 1670 
TE93 CIEJBICICICBCSCH 1670 
TE9B 68 1670 
1TE9T DICSDUDEESCS4UOCS 1671 Rw CLI7"RENCVE IT AND DO SYSTEM RESET, START.! 
TEAS BIXOCIDSCHYOCH DE 1671 
TEAC 4OR2ESE2ZE3C5SD440 1671 
TEBY DOICSELCSEIJ6B4OE2 1671 
TEBC EICTDOEI4B 1671 
TEC? C9C640C3 DEDSLSCS 1672 . CL25' YF CONNECTOR YS OFF THER,' 
1ECO CIEIDEDILOCIE2ZSO 1672 
TED1 D6CE6CESOF3C8C5D5 1672 
TEDS 6B 1672 
TEDA F3IFT7P&PIROCODSES3 1673 Sroca pc CL21°3741 INTERRUPT CHECK.° 
TEE2 CSDODIEGDIEI4ROC3 1673 
TEEA C8C5C3ID2Z4B 1673 
1EEFP 1674 PRT DS CLO . AINT PIELD. 
TPSA 40 1675 DC XL1¢4Qo% CLEARING BYTE. 
1676 
S677 SRE EREREKECE SERED 
3678 * EQUATES > | 
FOTQ KKK SKSRAKKKAKEAEAKEK SESE SEAR SES HSES SEES THESE RKEKAKKKAEESKE EKER TEESE RA ESE HERE 
0008 1680 ARR EQO x OG? 
60222 1681 HALT EQ0 K* 222! 
0216 1682 LINK EOU aP216* 
O22h 1683 LOAD FOU X'22K° 
O21A 1684 PRIWT EOU X*2TA° 
0272 1665 ONPACK EQU X* 27 
000% 1686 XR1 EQu xo 
0002 1687 XR2 Foo x' 925 
0984 1688 TFAR5 EQo tBu EF 
OAO3 1689 RINE EQU X'* GAO! 
0080 169060 SSW10 EOD KigO! 
O080 1691 SSWOO0 EOS x'sor 
0208 1692 SBYTEO EQD x*0208 ' 
O2GA 1693 SBYTE2 EQU X*O20a* 
OR07 1694 FRTN EQU X*OAO7 
13CE 1695 #0000 EQU R900 


Bare 16A0G74 TSNOV7S PROG ID 
BC 89. 825765 824870 PAGE 


IBS SAISTENARECE DXYAGNOSTIC PROGRAR PART NO. 
PAGE 


4911 3741 FUNCTION TEST WITHOUT THE WRAP CONNECTOR 


ERR LOC OBJ ECY CODE ADDR STMT SOURCE STATEMENT 


18DO 1696 HOO01 EQU W001 
17BF 1697 DROPD EQ TIOLRB 
1ECO 1698 INTRO EQU RMOY 
OA11 1699 END BEGIN 


DATE T6AU GTS TSeHOVTS OS ID 


ee ES. B28 Fes S70 PAGE 


ae } 
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4011 3744 FONCTIOS TEST WITHOUT THE WRAP CONNECTOR 


] CROSS-REPER ENCE 


| VALUE DEFNH REFPFRENCES 


+3 


pe eeeee 


163E 1315 1124" 1169 1234*® 1297 1329 

156C 1239 

1B7F 1635 0330 

1B97 1636 0324% 0326* 0327 

OAS3 0087 004% 

0008 1680 1089* 1090 1179% 1120 1122# 1125* 1126 1128* 1129 1182 1183 
1185* 1186 1288 1250% 1251 1254 1267 1269* 1270 1317 13718 
1372 1375" 1376 1409 1864 1495* 14086 1530 1533 

OFA? 0712 0700 

GAOD 024 0017 

OA11 0028 0052 1442 1699 

0D19 0367 0328 0331 0339 

1B29 1632 0370 

1CP5 1653 1162 1165 1218 

1621 1371 1168 1230 1291 

18F5 1577 0984 

1730 ©1397 1376 

1CAO 1648 1447 

1548 1230 1223 

OBP2 0281 0277% 

14A7 7190 11864 

1ORK 0841 92801 

19E3 0838 0830 

1637 1304 1270* 

1580 1267 C702 

162P 1317 1171 

1697 1346 1317* 

1E9B 1670 1431 

1804 1484 14983% 

1898 1523 1486* 

1800 1483 0392 0493 

189F8 1578 1510 

1AEB 1630 1206 

OE80 0563 0556 

1BCA 1638 6213 

41B11 1631 1209 

107F 0799 0791 

17BF 1697 0129 0699 0778 0876 0905 0925 

189FC 06158 0698 : 0786* 1272 1297 

OBY7 0233 0225« 

0c94 0330 0292 

91D «61597 0278* 02 0293 0298 0302 0305 0307 0309 9311 
0313 7 0342 0356 

1B46 1633 030 1* 034R% 0353" 0358* 0360* 0363* 6364" 0365 

6D13 0365 0347 

1CFF 1654 1159 

OCTE 0324 0294 

1620 1369 1374 

TB6B «1634 0333 0338 

1D09 1655 1156 

0C86 0326 0296 

16DF 1368 1382 

189¢ 1530 1160 1436 

18A7 1533 0372 1283 1287 1307 

1D10 1656 1172 

1494 1174 1129% 

10PE 0851 0842 

0828 0520 0503 

137B 1089 1008 1050 1055 1060 1065 


Alt 
ADDIT 
7 ALEB 
ALEBX 
® ALTER 
Fazer 


CY pee De Se te De 


F canter 
REGIN 
@ S23 0NN 
@ BIGEB 
BIS3EB 
@ BITS 
" BITSNF 
BRNCH 
i BINP 
Y BUSSY 
CALC 
m CKBYT 
IKKLS 
CKRST 
@ xKRSTT 
OKS 
ZKSIO 
@ CMPAPY 
SMP 
CNCTR 
; iene?) 
@ cope 
CODE 
g coo 
“ADR 
DARCK 


gor, 


DORST 
@ OR IPD 
@ pre 
pus 
@ ERERR 
® EBFLAG 


B ark 


EB 1 
@ ©B1ERR 
PEBIT 
EB12 


| eae 
@ EBZERR 


EB2T 

/ EPRNT1 
W £PRNT2 

FRORS 
@ ERSN 
© 22ST 

EROA 


ee 
EVER 


meEi3 
Orisa 


a ed al ol ad el ol el al od a oe ed dt oe kt lt Oe oe ee ee 


ee ee ee ee oe 


IC8P 1646 

1208 0959 

TTED 0987 C938 

OCBG 6338 338 0336 
Tec? HRY D692% C699 
TE5C 1667 1O091* 1092 


rSwoy7a 


IBA MAINTENANCE DIAGHOSTIC PROGR: | 


4011 


‘SIMBOL T 


PRCT 
PRIN 
“SOHD 

RAAAA 
“ AAAS5 
~ wALT 


~ HDNGID 
aPFrP 
(APPS 
- HRPE5S 
G PLEX 
 HOPSS 
SOOAA 
H0000 
e is 0 0 0 } 
40055 
930080 
“ ASSAA 
IARS5 
I PFOPF 
“FSO 
IMTR 
LWTRO 
“DNTRS 
INTS 
ENYVAL 
INVEL 
TOTRL 
ITONW 
ITSOW 
IVL 
Lo8 
LINE 
LINK 


be De > De Be 


MAPSS 
NSS 
4S31B 
NS32 
4562B 
“S38 
MSG&B 
W2ODD1 
NCODD2 
HCODDK 
HCODDS 
HOOD 

NCOD2 
RTOD4 


DARE 
8c HO. 


ee ee 


3741 PUNCTION TEST 


004 
001 
001 
002 


02 
014 
002 
001 
Go2 


034 
040 
001 
040 
001 
040 
001 
008 
904 
004 
00% 
O08 
604 
008 


T6406? 


R24765 


1COB 
1488 
O22A 
1915 
19 17 


1BEO 
1C8B 
TUBA 
0000 
T7HK9 


1C53 
TAQ3 
19 6C 
TA53 
WA03 
TAA3 
1A 53 
OCBA 
OCO5 
OCFO 
ODCB 
QC9R 
OCAS 
OCAC 


i 


T64Q 
1182 
1633 
1537 
1588 


1639 
1645 
1197 
0005 
1464 


1683 
1619 
16 16 
1622 
1620 
1625 
1624 
03474 
0343 
9355 
9363 
0335 
0335 
0337 


TENOV?S 


824870 


WITHOUT TEU 


REFERENCES 


1200 
0042* 
1S 41 


7490 


03917 
0049 
0672 
1451 
1515* 
0502 
1418 
0266 
0043 
0133 
0492 
0128 
0602 
0457 
9696 
0599 
0428 
0691* 
1435 


0754 


9491 
7552 
0989 
0994 
0168 
1390 
1383 
0998 
0138* 
153 1* 
0074 
0404 
0633 
0860 
0523 
0401 
0846 
O271* 
0399 
0603* 
1496 
0547 
119 2* 


9148 
0706 
1466* 
9031 
00231 
2936 
9036 
0565 
05€5 
6306 
0310 
O319 
0318 
0299 
0301 
0393 


WRAP 


CROSS~REFER ENCE 


9235 
0756 
14582 


CONNECTOR 


0$32* 


0140 
0443 
0674 
1085 


0507 
O274*% 


OuGT* 
0661* 


0373 
0793 
1469 


O406 
0834 


0444 
0858 


1028 1033 


0182 
0478 
0710 


06f5 


0502 
1188 


PART WO. 
PAGE 


O5 74 
0966 


0571 
17193 


0527 
1000 


0637 
T4HA9 


0476 
9954 


1038 


OSE 4* 
1234 
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8011 3741 FUNCTION TEST WITROUT THE WRAP CONNECTOR 
CROSS~REFPER ENCE 
yO ABOL T LEN VALUE REFERENCES 
OO& 17 '1F T379% 1384% 1385 18008 


008 1735 {3IBO* 1391% 1392 1801*# 
001 1918 718M" 1192 1198 12048 
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